<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
<meta http-equiv="X-UA-Compatible" content="IE=9"/>
<meta name="generator" content="Doxygen 1.8.11"/>
<title>ESP8266 ILI9341 display support code with printf sources, wire-frame viewer and custom fonts: lib/matrix.c Source File</title>
<link href="tabs.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="jquery.js"></script>
<script type="text/javascript" src="dynsections.js"></script>
<link href="search/search.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="search/searchdata.js"></script>
<script type="text/javascript" src="search/search.js"></script>
<script type="text/javascript">
  $(document).ready(function() { init_search(); });
</script>
<link href="doxygen.css" rel="stylesheet" type="text/css" />
</head>
<body>
<div id="top"><!-- do not remove this div, it is closed by doxygen! -->
<div id="titlearea">
<table cellspacing="0" cellpadding="0">
 <tbody>
 <tr style="height: 56px;">
  <td id="projectalign" style="padding-left: 0.5em;">
   <div id="projectname">ESP8266 ILI9341 display support code with printf sources, wire-frame viewer and custom fonts
   &#160;<span id="projectnumber">1.0</span>
   </div>
   <div id="projectbrief">ESP8266ILI9341DisplayProject</div>
  </td>
 </tr>
 </tbody>
</table>
</div>
<!-- end header part -->
<!-- Generated by Doxygen 1.8.11 -->
<script type="text/javascript">
var searchBox = new SearchBox("searchBox", "search",false,'Search');
</script>
  <div id="navrow1" class="tabs">
    <ul class="tablist">
      <li><a href="index.html"><span>Main&#160;Page</span></a></li>
      <li><a href="pages.html"><span>Related&#160;Pages</span></a></li>
      <li><a href="annotated.html"><span>Data&#160;Structures</span></a></li>
      <li class="current"><a href="files.html"><span>Files</span></a></li>
      <li>
        <div id="MSearchBox" class="MSearchBoxInactive">
        <span class="left">
          <img id="MSearchSelect" src="search/mag_sel.png"
               onmouseover="return searchBox.OnSearchSelectShow()"
               onmouseout="return searchBox.OnSearchSelectHide()"
               alt=""/>
          <input type="text" id="MSearchField" value="Search" accesskey="S"
               onfocus="searchBox.OnSearchFieldFocus(true)" 
               onblur="searchBox.OnSearchFieldFocus(false)" 
               onkeyup="searchBox.OnSearchFieldChange(event)"/>
          </span><span class="right">
            <a id="MSearchClose" href="javascript:searchBox.CloseResultsWindow()"><img id="MSearchCloseImg" border="0" src="search/close.png" alt=""/></a>
          </span>
        </div>
      </li>
    </ul>
  </div>
  <div id="navrow2" class="tabs2">
    <ul class="tablist">
      <li><a href="files.html"><span>File&#160;List</span></a></li>
      <li><a href="globals.html"><span>Globals</span></a></li>
    </ul>
  </div>
<!-- window showing the filter options -->
<div id="MSearchSelectWindow"
     onmouseover="return searchBox.OnSearchSelectShow()"
     onmouseout="return searchBox.OnSearchSelectHide()"
     onkeydown="return searchBox.OnSearchSelectKey(event)">
</div>

<!-- iframe showing the search results (closed by default) -->
<div id="MSearchResultsWindow">
<iframe src="javascript:void(0)" frameborder="0" 
        name="MSearchResults" id="MSearchResults">
</iframe>
</div>

<div id="nav-path" class="navpath">
  <ul>
<li class="navelem"><a class="el" href="dir_97aefd0d527b934f1d99a682da8fe6a9.html">lib</a></li>  </ul>
</div>
</div><!-- top -->
<div class="header">
  <div class="headertitle">
<div class="title">matrix.c</div>  </div>
</div><!--header-->
<div class="contents">
<a href="matrix_8c.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno">    1</span>&#160;</div><div class="line"><a name="l00023"></a><span class="lineno">   23</span>&#160;<span class="preprocessor">#include &quot;<a class="code" href="user__config_8h.html">user_config.h</a>&quot;</span></div><div class="line"><a name="l00024"></a><span class="lineno">   24</span>&#160;</div><div class="line"><a name="l00025"></a><span class="lineno">   25</span>&#160;<span class="preprocessor">#include &quot;<a class="code" href="matrix_8h.html">matrix.h</a>&quot;</span></div><div class="line"><a name="l00026"></a><span class="lineno">   26</span>&#160;</div><div class="line"><a name="l00029"></a><span class="lineno">   29</span>&#160;</div><div class="line"><a name="l00030"></a><span class="lineno">   30</span>&#160;</div><div class="line"><a name="l00036"></a><span class="lineno">   36</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00037"></a><span class="lineno"><a class="line" href="matrix_8h.html#a533fea51f46e772b14ec519a9f36aef9">   37</a></span>&#160;<span class="keywordtype">int</span> <a class="code" href="matrix_8c.html#a533fea51f46e772b14ec519a9f36aef9">TestSquare</a>(<a class="code" href="struct__mat.html">mat_t</a> MatA)</div><div class="line"><a name="l00038"></a><span class="lineno">   38</span>&#160;{</div><div class="line"><a name="l00039"></a><span class="lineno">   39</span>&#160;    <span class="keywordflow">return</span>( (MatA.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a> == MatA.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>) ? 1 : 0 );</div><div class="line"><a name="l00040"></a><span class="lineno">   40</span>&#160;}</div><div class="line"><a name="l00041"></a><span class="lineno">   41</span>&#160;</div><div class="line"><a name="l00047"></a><span class="lineno">   47</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00048"></a><span class="lineno"><a class="line" href="matrix_8h.html#a5595f5b7a290aaeaf2daf98858bbdac2">   48</a></span>&#160;<a class="code" href="struct__mat.html">mat_t</a> <a class="code" href="matrix_8c.html#a5595f5b7a290aaeaf2daf98858bbdac2">MatAlloc</a>(<span class="keywordtype">int</span> rows, <span class="keywordtype">int</span> cols)</div><div class="line"><a name="l00049"></a><span class="lineno">   49</span>&#160;{</div><div class="line"><a name="l00050"></a><span class="lineno">   50</span>&#160;    <span class="keywordtype">int</span> r;</div><div class="line"><a name="l00051"></a><span class="lineno">   51</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatA;</div><div class="line"><a name="l00052"></a><span class="lineno">   52</span>&#160;    <span class="keywordtype">float</span> *fptr;</div><div class="line"><a name="l00053"></a><span class="lineno">   53</span>&#160;</div><div class="line"><a name="l00054"></a><span class="lineno">   54</span>&#160;    <span class="keywordflow">if</span>(rows &lt; 1)</div><div class="line"><a name="l00055"></a><span class="lineno">   55</span>&#160;    {</div><div class="line"><a name="l00056"></a><span class="lineno">   56</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 1</span></div><div class="line"><a name="l00057"></a><span class="lineno">   57</span>&#160;        <span class="comment">//FIXME</span></div><div class="line"><a name="l00058"></a><span class="lineno">   58</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;MatAlloc: rows &lt; 1\n&quot;</span>);</div><div class="line"><a name="l00059"></a><span class="lineno">   59</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00060"></a><span class="lineno">   60</span>&#160;        rows = 1;</div><div class="line"><a name="l00061"></a><span class="lineno">   61</span>&#160;    }</div><div class="line"><a name="l00062"></a><span class="lineno">   62</span>&#160;    <span class="keywordflow">if</span>(cols&lt; 1)</div><div class="line"><a name="l00063"></a><span class="lineno">   63</span>&#160;    {</div><div class="line"><a name="l00064"></a><span class="lineno">   64</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 1</span></div><div class="line"><a name="l00065"></a><span class="lineno">   65</span>&#160;        <span class="comment">//FIXME</span></div><div class="line"><a name="l00066"></a><span class="lineno">   66</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;MatAlloc: cols &lt; 1\n&quot;</span>);</div><div class="line"><a name="l00067"></a><span class="lineno">   67</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00068"></a><span class="lineno">   68</span>&#160;        cols = 1;</div><div class="line"><a name="l00069"></a><span class="lineno">   69</span>&#160;    }</div><div class="line"><a name="l00070"></a><span class="lineno">   70</span>&#160;    </div><div class="line"><a name="l00071"></a><span class="lineno">   71</span>&#160;    MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a> = <a class="code" href="system_8c.html#a65ca18fba3d6cdb9ce8ca8040a96e0c5">safecalloc</a>(rows,<span class="keyword">sizeof</span>(<span class="keywordtype">float</span> *));</div><div class="line"><a name="l00072"></a><span class="lineno">   72</span>&#160;    <span class="keywordflow">if</span>(MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a> == <a class="code" href="cpu_8h.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>)</div><div class="line"><a name="l00073"></a><span class="lineno">   73</span>&#160;    {</div><div class="line"><a name="l00074"></a><span class="lineno">   74</span>&#160;        MatA.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a> = 0;</div><div class="line"><a name="l00075"></a><span class="lineno">   75</span>&#160;        MatA.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a> = 0;</div><div class="line"><a name="l00076"></a><span class="lineno">   76</span>&#160;        <span class="keywordflow">return</span>(MatA);</div><div class="line"><a name="l00077"></a><span class="lineno">   77</span>&#160;    }</div><div class="line"><a name="l00078"></a><span class="lineno">   78</span>&#160;</div><div class="line"><a name="l00079"></a><span class="lineno">   79</span>&#160;    <span class="keywordflow">for</span> (r=0;r&lt;rows;r++)</div><div class="line"><a name="l00080"></a><span class="lineno">   80</span>&#160;    {</div><div class="line"><a name="l00081"></a><span class="lineno">   81</span>&#160;        fptr = <a class="code" href="system_8c.html#a65ca18fba3d6cdb9ce8ca8040a96e0c5">safecalloc</a>(cols,<span class="keyword">sizeof</span>(<span class="keywordtype">float</span>));</div><div class="line"><a name="l00082"></a><span class="lineno">   82</span>&#160;        <span class="keywordflow">if</span>(fptr == <a class="code" href="cpu_8h.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>)</div><div class="line"><a name="l00083"></a><span class="lineno">   83</span>&#160;        {</div><div class="line"><a name="l00084"></a><span class="lineno">   84</span>&#160;            <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatA);</div><div class="line"><a name="l00085"></a><span class="lineno">   85</span>&#160;            <span class="keywordflow">return</span>(MatA);</div><div class="line"><a name="l00086"></a><span class="lineno">   86</span>&#160;        }</div><div class="line"><a name="l00087"></a><span class="lineno">   87</span>&#160;</div><div class="line"><a name="l00088"></a><span class="lineno">   88</span>&#160;        MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[r] = fptr;</div><div class="line"><a name="l00089"></a><span class="lineno">   89</span>&#160;    }</div><div class="line"><a name="l00090"></a><span class="lineno">   90</span>&#160;    MatA.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a> = rows;</div><div class="line"><a name="l00091"></a><span class="lineno">   91</span>&#160;    MatA.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a> = cols;</div><div class="line"><a name="l00092"></a><span class="lineno">   92</span>&#160;    <span class="keywordflow">if</span>(cols == rows)</div><div class="line"><a name="l00093"></a><span class="lineno">   93</span>&#160;        MatA.<a class="code" href="struct__mat.html#ab54203ad7b60fc23832cb3b2a863857f">size</a> = cols;</div><div class="line"><a name="l00094"></a><span class="lineno">   94</span>&#160;    <span class="keywordflow">else</span></div><div class="line"><a name="l00095"></a><span class="lineno">   95</span>&#160;        MatA.<a class="code" href="struct__mat.html#ab54203ad7b60fc23832cb3b2a863857f">size</a> = 0;</div><div class="line"><a name="l00096"></a><span class="lineno">   96</span>&#160;    <span class="keywordflow">return</span>(MatA);</div><div class="line"><a name="l00097"></a><span class="lineno">   97</span>&#160;}</div><div class="line"><a name="l00098"></a><span class="lineno">   98</span>&#160;</div><div class="line"><a name="l00104"></a><span class="lineno">  104</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00105"></a><span class="lineno"><a class="line" href="matrix_8h.html#ae601ec2eed7dd95254dffd0e6ac03d23">  105</a></span>&#160;<a class="code" href="struct__mat.html">mat_t</a> <a class="code" href="matrix_8c.html#ae601ec2eed7dd95254dffd0e6ac03d23">MatAllocSQ</a>(<span class="keywordtype">int</span> size)</div><div class="line"><a name="l00106"></a><span class="lineno">  106</span>&#160;{</div><div class="line"><a name="l00107"></a><span class="lineno">  107</span>&#160;    <span class="keywordflow">return</span>(<a class="code" href="matrix_8c.html#a5595f5b7a290aaeaf2daf98858bbdac2">MatAlloc</a>(size,size));</div><div class="line"><a name="l00108"></a><span class="lineno">  108</span>&#160;}</div><div class="line"><a name="l00109"></a><span class="lineno">  109</span>&#160;</div><div class="line"><a name="l00110"></a><span class="lineno">  110</span>&#160;</div><div class="line"><a name="l00115"></a><span class="lineno">  115</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00116"></a><span class="lineno"><a class="line" href="matrix_8h.html#a2b9e8a544e7c2b04934737a30a19c6f6">  116</a></span>&#160;<span class="keywordtype">void</span> <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(<a class="code" href="struct__mat.html">mat_t</a> matF)</div><div class="line"><a name="l00117"></a><span class="lineno">  117</span>&#160;{</div><div class="line"><a name="l00118"></a><span class="lineno">  118</span>&#160;    <span class="keywordtype">int</span> i;</div><div class="line"><a name="l00119"></a><span class="lineno">  119</span>&#160;    <span class="keywordflow">if</span>(matF.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>) </div><div class="line"><a name="l00120"></a><span class="lineno">  120</span>&#160;    {</div><div class="line"><a name="l00121"></a><span class="lineno">  121</span>&#160;        <span class="keywordflow">for</span> (i=0;i&lt;matF.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>;i++)</div><div class="line"><a name="l00122"></a><span class="lineno">  122</span>&#160;        {</div><div class="line"><a name="l00123"></a><span class="lineno">  123</span>&#160;            <span class="keywordflow">if</span>(matF.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[i])</div><div class="line"><a name="l00124"></a><span class="lineno">  124</span>&#160;            {</div><div class="line"><a name="l00125"></a><span class="lineno">  125</span>&#160;                <a class="code" href="system_8c.html#a61f06ee340417c629633142e0a5db288">safefree</a>(matF.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[i]);</div><div class="line"><a name="l00126"></a><span class="lineno">  126</span>&#160;                matF.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[i] = <a class="code" href="cpu_8h.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l00127"></a><span class="lineno">  127</span>&#160;            }</div><div class="line"><a name="l00128"></a><span class="lineno">  128</span>&#160;            <span class="keywordflow">else</span></div><div class="line"><a name="l00129"></a><span class="lineno">  129</span>&#160;            {</div><div class="line"><a name="l00130"></a><span class="lineno">  130</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 1</span></div><div class="line"><a name="l00131"></a><span class="lineno">  131</span>&#160;                <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;MatFree: attempt to free null matF row: %d\n&quot;</span>, i);</div><div class="line"><a name="l00132"></a><span class="lineno">  132</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00133"></a><span class="lineno">  133</span>&#160;            }</div><div class="line"><a name="l00134"></a><span class="lineno">  134</span>&#160;        }</div><div class="line"><a name="l00135"></a><span class="lineno">  135</span>&#160;        <a class="code" href="system_8c.html#a61f06ee340417c629633142e0a5db288">safefree</a>(matF.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>);</div><div class="line"><a name="l00136"></a><span class="lineno">  136</span>&#160;        matF.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a> = <a class="code" href="cpu_8h.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l00137"></a><span class="lineno">  137</span>&#160;    }</div><div class="line"><a name="l00138"></a><span class="lineno">  138</span>&#160;    <span class="keywordflow">else</span></div><div class="line"><a name="l00139"></a><span class="lineno">  139</span>&#160;    {</div><div class="line"><a name="l00140"></a><span class="lineno">  140</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 1</span></div><div class="line"><a name="l00141"></a><span class="lineno">  141</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;MatFree: attempt to free null matF\n&quot;</span>);</div><div class="line"><a name="l00142"></a><span class="lineno">  142</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00143"></a><span class="lineno">  143</span>&#160;    }</div><div class="line"><a name="l00144"></a><span class="lineno">  144</span>&#160;}</div><div class="line"><a name="l00145"></a><span class="lineno">  145</span>&#160;</div><div class="line"><a name="l00151"></a><span class="lineno">  151</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00152"></a><span class="lineno"><a class="line" href="matrix_8h.html#ad8c8055df2f89f410d49002690ede4cf">  152</a></span>&#160;<a class="code" href="struct__mat.html">mat_t</a> <a class="code" href="matrix_8c.html#ad8c8055df2f89f410d49002690ede4cf">MatLoad</a>(<span class="keywordtype">void</span> *V, <span class="keywordtype">int</span> rows, <span class="keywordtype">int</span> cols)</div><div class="line"><a name="l00153"></a><span class="lineno">  153</span>&#160;{</div><div class="line"><a name="l00154"></a><span class="lineno">  154</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatA = <a class="code" href="matrix_8c.html#a5595f5b7a290aaeaf2daf98858bbdac2">MatAlloc</a>(rows,cols);</div><div class="line"><a name="l00155"></a><span class="lineno">  155</span>&#160;    <span class="keywordtype">float</span> *f = (<span class="keywordtype">float</span> *) V;</div><div class="line"><a name="l00156"></a><span class="lineno">  156</span>&#160;</div><div class="line"><a name="l00157"></a><span class="lineno">  157</span>&#160;    <span class="keywordtype">int</span> r,c,k;</div><div class="line"><a name="l00158"></a><span class="lineno">  158</span>&#160;    </div><div class="line"><a name="l00159"></a><span class="lineno">  159</span>&#160;    k = 0;</div><div class="line"><a name="l00160"></a><span class="lineno">  160</span>&#160;    <span class="keywordflow">for</span>(r=0;r&lt;rows;++r)</div><div class="line"><a name="l00161"></a><span class="lineno">  161</span>&#160;    {</div><div class="line"><a name="l00162"></a><span class="lineno">  162</span>&#160;        <span class="keywordflow">for</span>(c=0;c&lt;cols;++c)</div><div class="line"><a name="l00163"></a><span class="lineno">  163</span>&#160;        {</div><div class="line"><a name="l00164"></a><span class="lineno">  164</span>&#160;            MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[r][c] = f[k++];</div><div class="line"><a name="l00165"></a><span class="lineno">  165</span>&#160;        }</div><div class="line"><a name="l00166"></a><span class="lineno">  166</span>&#160;    }</div><div class="line"><a name="l00167"></a><span class="lineno">  167</span>&#160;    <span class="keywordflow">return</span>(MatA);</div><div class="line"><a name="l00168"></a><span class="lineno">  168</span>&#160;}</div><div class="line"><a name="l00169"></a><span class="lineno">  169</span>&#160;</div><div class="line"><a name="l00175"></a><span class="lineno">  175</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00176"></a><span class="lineno"><a class="line" href="matrix_8h.html#ad554fcd60a6674448de06fbfc40d41d0">  176</a></span>&#160;<a class="code" href="struct__mat.html">mat_t</a> <a class="code" href="matrix_8c.html#ad554fcd60a6674448de06fbfc40d41d0">MatLoadSQ</a>(<span class="keywordtype">void</span> *V, <span class="keywordtype">int</span> size)</div><div class="line"><a name="l00177"></a><span class="lineno">  177</span>&#160;{</div><div class="line"><a name="l00178"></a><span class="lineno">  178</span>&#160;    <span class="keywordflow">return</span>(<a class="code" href="matrix_8c.html#ad8c8055df2f89f410d49002690ede4cf">MatLoad</a>(V,size,size));</div><div class="line"><a name="l00179"></a><span class="lineno">  179</span>&#160;}</div><div class="line"><a name="l00180"></a><span class="lineno">  180</span>&#160;</div><div class="line"><a name="l00181"></a><span class="lineno">  181</span>&#160;</div><div class="line"><a name="l00186"></a><span class="lineno">  186</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00187"></a><span class="lineno"><a class="line" href="matrix_8h.html#ac950e582063e7d093f0384c5a35b6024">  187</a></span>&#160;<span class="keywordtype">void</span> <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(<a class="code" href="struct__mat.html">mat_t</a> matrix)</div><div class="line"><a name="l00188"></a><span class="lineno">  188</span>&#160;{</div><div class="line"><a name="l00189"></a><span class="lineno">  189</span>&#160;    <span class="keywordtype">int</span> r,c;</div><div class="line"><a name="l00190"></a><span class="lineno">  190</span>&#160;    </div><div class="line"><a name="l00191"></a><span class="lineno">  191</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;size: rows(%d), cols(%d)\n&quot;</span>, matrix.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>,matrix.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>);</div><div class="line"><a name="l00192"></a><span class="lineno">  192</span>&#160;    <span class="keywordflow">for</span>(r=0;r&lt;matrix.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>;++r)</div><div class="line"><a name="l00193"></a><span class="lineno">  193</span>&#160;    {</div><div class="line"><a name="l00194"></a><span class="lineno">  194</span>&#160;        <span class="keywordflow">for</span>(c=0;c&lt;matrix.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>;++c)</div><div class="line"><a name="l00195"></a><span class="lineno">  195</span>&#160;        {</div><div class="line"><a name="l00196"></a><span class="lineno">  196</span>&#160;            <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;%+e &quot;</span>, (<span class="keywordtype">double</span>) matrix.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[r][c]);</div><div class="line"><a name="l00197"></a><span class="lineno">  197</span>&#160;        }</div><div class="line"><a name="l00198"></a><span class="lineno">  198</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;\n&quot;</span>);</div><div class="line"><a name="l00199"></a><span class="lineno">  199</span>&#160;    }</div><div class="line"><a name="l00200"></a><span class="lineno">  200</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;\n&quot;</span>);</div><div class="line"><a name="l00201"></a><span class="lineno">  201</span>&#160;}</div><div class="line"><a name="l00202"></a><span class="lineno">  202</span>&#160;</div><div class="line"><a name="l00211"></a><span class="lineno">  211</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00212"></a><span class="lineno"><a class="line" href="matrix_8h.html#a5d91cec0176890e753207fa1b32ef505">  212</a></span>&#160;<a class="code" href="struct__mat.html">mat_t</a> <a class="code" href="matrix_8c.html#a5d91cec0176890e753207fa1b32ef505">DeleteRowCol</a>(<a class="code" href="struct__mat.html">mat_t</a> MatA,<span class="keywordtype">int</span> row,<span class="keywordtype">int</span> col)</div><div class="line"><a name="l00213"></a><span class="lineno">  213</span>&#160;{</div><div class="line"><a name="l00214"></a><span class="lineno">  214</span>&#160;    <span class="keywordtype">int</span> r,c;</div><div class="line"><a name="l00215"></a><span class="lineno">  215</span>&#160;    <span class="keywordtype">int</span> rM, cM;</div><div class="line"><a name="l00216"></a><span class="lineno">  216</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatM;</div><div class="line"><a name="l00217"></a><span class="lineno">  217</span>&#160;    <span class="keywordtype">int</span> rows = MatA.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>;</div><div class="line"><a name="l00218"></a><span class="lineno">  218</span>&#160;    <span class="keywordtype">int</span> cols = MatA.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>;</div><div class="line"><a name="l00219"></a><span class="lineno">  219</span>&#160;    <span class="keywordflow">if</span>(cols &lt; 2)</div><div class="line"><a name="l00220"></a><span class="lineno">  220</span>&#160;    {</div><div class="line"><a name="l00221"></a><span class="lineno">  221</span>&#160;        <span class="comment">//FIXME user error</span></div><div class="line"><a name="l00222"></a><span class="lineno">  222</span>&#160;        cols = 2;</div><div class="line"><a name="l00223"></a><span class="lineno">  223</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 1</span></div><div class="line"><a name="l00224"></a><span class="lineno">  224</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;DeleteRowCol cols:%d &lt; 2 error\n&quot;</span>,cols);</div><div class="line"><a name="l00225"></a><span class="lineno">  225</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00226"></a><span class="lineno">  226</span>&#160;    }</div><div class="line"><a name="l00227"></a><span class="lineno">  227</span>&#160;    <span class="keywordflow">if</span>(rows &lt; 2)</div><div class="line"><a name="l00228"></a><span class="lineno">  228</span>&#160;    {</div><div class="line"><a name="l00229"></a><span class="lineno">  229</span>&#160;        <span class="comment">//FIXME user error</span></div><div class="line"><a name="l00230"></a><span class="lineno">  230</span>&#160;        rows = 2;</div><div class="line"><a name="l00231"></a><span class="lineno">  231</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 1</span></div><div class="line"><a name="l00232"></a><span class="lineno">  232</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;DeleteRowCol rows:%d &lt; 2 error\n&quot;</span>,rows);</div><div class="line"><a name="l00233"></a><span class="lineno">  233</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00234"></a><span class="lineno">  234</span>&#160;    }</div><div class="line"><a name="l00235"></a><span class="lineno">  235</span>&#160;</div><div class="line"><a name="l00236"></a><span class="lineno">  236</span>&#160;    MatM = <a class="code" href="matrix_8c.html#a5595f5b7a290aaeaf2daf98858bbdac2">MatAlloc</a>(rows-1,cols-1);</div><div class="line"><a name="l00237"></a><span class="lineno">  237</span>&#160;    rM = 0;</div><div class="line"><a name="l00238"></a><span class="lineno">  238</span>&#160;    <span class="keywordflow">for</span>(r=0;r&lt;MatA.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>;++r)</div><div class="line"><a name="l00239"></a><span class="lineno">  239</span>&#160;    {</div><div class="line"><a name="l00240"></a><span class="lineno">  240</span>&#160;        <span class="comment">// delete row</span></div><div class="line"><a name="l00241"></a><span class="lineno">  241</span>&#160;        <span class="keywordflow">if</span>(r == row)</div><div class="line"><a name="l00242"></a><span class="lineno">  242</span>&#160;            <span class="keywordflow">continue</span>;</div><div class="line"><a name="l00243"></a><span class="lineno">  243</span>&#160;        cM = 0;</div><div class="line"><a name="l00244"></a><span class="lineno">  244</span>&#160;        <span class="keywordflow">for</span>(c=0;c&lt;MatA.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>;++c)</div><div class="line"><a name="l00245"></a><span class="lineno">  245</span>&#160;        {</div><div class="line"><a name="l00246"></a><span class="lineno">  246</span>&#160;            <span class="comment">// delete col</span></div><div class="line"><a name="l00247"></a><span class="lineno">  247</span>&#160;            <span class="keywordflow">if</span>(c == col)</div><div class="line"><a name="l00248"></a><span class="lineno">  248</span>&#160;                <span class="keywordflow">continue</span>;</div><div class="line"><a name="l00249"></a><span class="lineno">  249</span>&#160;            MatM.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[rM][cM] = MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[r][c];</div><div class="line"><a name="l00250"></a><span class="lineno">  250</span>&#160;            ++cM;</div><div class="line"><a name="l00251"></a><span class="lineno">  251</span>&#160;        }</div><div class="line"><a name="l00252"></a><span class="lineno">  252</span>&#160;        ++rM;</div><div class="line"><a name="l00253"></a><span class="lineno">  253</span>&#160;    }</div><div class="line"><a name="l00254"></a><span class="lineno">  254</span>&#160;    <span class="keywordflow">return</span>(MatM);</div><div class="line"><a name="l00255"></a><span class="lineno">  255</span>&#160;}</div><div class="line"><a name="l00256"></a><span class="lineno">  256</span>&#160;</div><div class="line"><a name="l00262"></a><span class="lineno">  262</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00263"></a><span class="lineno"><a class="line" href="matrix_8h.html#a69e8069902ef085b6c19b391f3379492">  263</a></span>&#160;<a class="code" href="struct__mat.html">mat_t</a> <a class="code" href="matrix_8c.html#a69e8069902ef085b6c19b391f3379492">Transpose</a>(<a class="code" href="struct__mat.html">mat_t</a> MatA)</div><div class="line"><a name="l00264"></a><span class="lineno">  264</span>&#160;{</div><div class="line"><a name="l00265"></a><span class="lineno">  265</span>&#160;    <span class="keywordtype">int</span> c,r;</div><div class="line"><a name="l00266"></a><span class="lineno">  266</span>&#160;    <span class="comment">// allocate using transposed rows and columns</span></div><div class="line"><a name="l00267"></a><span class="lineno">  267</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatR = <a class="code" href="matrix_8c.html#a5595f5b7a290aaeaf2daf98858bbdac2">MatAlloc</a>(MatA.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>, MatA.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>);</div><div class="line"><a name="l00268"></a><span class="lineno">  268</span>&#160;    <span class="comment">// row</span></div><div class="line"><a name="l00269"></a><span class="lineno">  269</span>&#160;    <span class="keywordflow">for</span> (r = 0; r &lt; MatA.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>; r++)</div><div class="line"><a name="l00270"></a><span class="lineno">  270</span>&#160;    {</div><div class="line"><a name="l00271"></a><span class="lineno">  271</span>&#160;        <span class="comment">// col</span></div><div class="line"><a name="l00272"></a><span class="lineno">  272</span>&#160;        <span class="keywordflow">for</span>( c = 0 ; c &lt; MatA.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a> ; c++ )</div><div class="line"><a name="l00273"></a><span class="lineno">  273</span>&#160;        {</div><div class="line"><a name="l00274"></a><span class="lineno">  274</span>&#160;            <span class="comment">// transposed</span></div><div class="line"><a name="l00275"></a><span class="lineno">  275</span>&#160;            MatR.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[c][r] = MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[r][c];</div><div class="line"><a name="l00276"></a><span class="lineno">  276</span>&#160;        }</div><div class="line"><a name="l00277"></a><span class="lineno">  277</span>&#160;    }</div><div class="line"><a name="l00278"></a><span class="lineno">  278</span>&#160;    <span class="keywordflow">return</span>(MatR);</div><div class="line"><a name="l00279"></a><span class="lineno">  279</span>&#160;}</div><div class="line"><a name="l00280"></a><span class="lineno">  280</span>&#160;</div><div class="line"><a name="l00290"></a><span class="lineno">  290</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00291"></a><span class="lineno"><a class="line" href="matrix_8h.html#a37d07d9a07bb5ed06e22ac723e7cd269">  291</a></span>&#160;<span class="keywordtype">float</span> <a class="code" href="matrix_8c.html#a37d07d9a07bb5ed06e22ac723e7cd269">Minor</a>(<a class="code" href="struct__mat.html">mat_t</a> MatA, <span class="keywordtype">int</span> row, <span class="keywordtype">int</span> col)</div><div class="line"><a name="l00292"></a><span class="lineno">  292</span>&#160;{</div><div class="line"><a name="l00293"></a><span class="lineno">  293</span>&#160;    <span class="keywordtype">float</span> D;</div><div class="line"><a name="l00294"></a><span class="lineno">  294</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> SubMat = <a class="code" href="matrix_8c.html#a5d91cec0176890e753207fa1b32ef505">DeleteRowCol</a>(MatA, row, col);</div><div class="line"><a name="l00295"></a><span class="lineno">  295</span>&#160;    D = <a class="code" href="matrix_8c.html#af4eb7f5eff3cb27e283a27c7fbb53d6a">Determinant</a>(SubMat);</div><div class="line"><a name="l00296"></a><span class="lineno">  296</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(SubMat);</div><div class="line"><a name="l00297"></a><span class="lineno">  297</span>&#160;    <span class="keywordflow">return</span>(D);</div><div class="line"><a name="l00298"></a><span class="lineno">  298</span>&#160;}</div><div class="line"><a name="l00299"></a><span class="lineno">  299</span>&#160;</div><div class="line"><a name="l00309"></a><span class="lineno">  309</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00310"></a><span class="lineno"><a class="line" href="matrix_8h.html#aa96a1963cc354fe2a055eae3c846227c">  310</a></span>&#160;<span class="keywordtype">float</span> <a class="code" href="matrix_8c.html#aa96a1963cc354fe2a055eae3c846227c">Cofactor</a>(<a class="code" href="struct__mat.html">mat_t</a> MatA, <span class="keywordtype">int</span> row, <span class="keywordtype">int</span> col)</div><div class="line"><a name="l00311"></a><span class="lineno">  311</span>&#160;{</div><div class="line"><a name="l00312"></a><span class="lineno">  312</span>&#160;    <span class="keywordtype">float</span> D = <a class="code" href="matrix_8c.html#a37d07d9a07bb5ed06e22ac723e7cd269">Minor</a>(MatA, row, col);;</div><div class="line"><a name="l00313"></a><span class="lineno">  313</span>&#160;    <span class="comment">// (-1)exp(row+col)  is -1 if (row+col) odd otherwise 1.0 if even</span></div><div class="line"><a name="l00314"></a><span class="lineno">  314</span>&#160;    D *= ( ((row+col) &amp; 1) ? -1.0 : 1.0);</div><div class="line"><a name="l00315"></a><span class="lineno">  315</span>&#160;    <span class="keywordflow">return</span>(D);</div><div class="line"><a name="l00316"></a><span class="lineno">  316</span>&#160;}</div><div class="line"><a name="l00317"></a><span class="lineno">  317</span>&#160;</div><div class="line"><a name="l00324"></a><span class="lineno">  324</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00325"></a><span class="lineno"><a class="line" href="matrix_8h.html#a5140bc12eedbf802992531ca0ef3f0a8">  325</a></span>&#160;<a class="code" href="struct__mat.html">mat_t</a> <a class="code" href="matrix_8c.html#a5140bc12eedbf802992531ca0ef3f0a8">Adjugate</a>(<a class="code" href="struct__mat.html">mat_t</a> MatA)</div><div class="line"><a name="l00326"></a><span class="lineno">  326</span>&#160;{</div><div class="line"><a name="l00327"></a><span class="lineno">  327</span>&#160;    <span class="keywordtype">int</span> r,c;</div><div class="line"><a name="l00328"></a><span class="lineno">  328</span>&#160;    <span class="comment">// Since the result is the transpose we allocate switching rows and cols here</span></div><div class="line"><a name="l00329"></a><span class="lineno">  329</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatAdj = <a class="code" href="matrix_8c.html#a5595f5b7a290aaeaf2daf98858bbdac2">MatAlloc</a>(MatA.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>,MatA.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>);</div><div class="line"><a name="l00330"></a><span class="lineno">  330</span>&#160;</div><div class="line"><a name="l00331"></a><span class="lineno">  331</span>&#160;    <span class="keywordflow">for</span>(r = 0; r&lt; MatA.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>;++r)</div><div class="line"><a name="l00332"></a><span class="lineno">  332</span>&#160;    {</div><div class="line"><a name="l00333"></a><span class="lineno">  333</span>&#160;        <span class="keywordflow">for</span>(c = 0; c &lt; MatA.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>;++c)</div><div class="line"><a name="l00334"></a><span class="lineno">  334</span>&#160;        {</div><div class="line"><a name="l00335"></a><span class="lineno">  335</span>&#160;            <span class="comment">// transpose rows and columns when storing Cofactors to get the Adjugate</span></div><div class="line"><a name="l00336"></a><span class="lineno">  336</span>&#160;            MatAdj.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[c][r] = <a class="code" href="matrix_8c.html#aa96a1963cc354fe2a055eae3c846227c">Cofactor</a>(MatA,r,c);</div><div class="line"><a name="l00337"></a><span class="lineno">  337</span>&#160;        }</div><div class="line"><a name="l00338"></a><span class="lineno">  338</span>&#160;    }</div><div class="line"><a name="l00339"></a><span class="lineno">  339</span>&#160;    <span class="keywordflow">return</span>(MatAdj);</div><div class="line"><a name="l00340"></a><span class="lineno">  340</span>&#160;}</div><div class="line"><a name="l00341"></a><span class="lineno">  341</span>&#160;</div><div class="line"><a name="l00342"></a><span class="lineno">  342</span>&#160;    </div><div class="line"><a name="l00349"></a><span class="lineno">  349</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00350"></a><span class="lineno"><a class="line" href="matrix_8h.html#af4eb7f5eff3cb27e283a27c7fbb53d6a">  350</a></span>&#160;<span class="keywordtype">float</span> <a class="code" href="matrix_8c.html#af4eb7f5eff3cb27e283a27c7fbb53d6a">Determinant</a>(<a class="code" href="struct__mat.html">mat_t</a> MatA)</div><div class="line"><a name="l00351"></a><span class="lineno">  351</span>&#160;{</div><div class="line"><a name="l00352"></a><span class="lineno">  352</span>&#160;    <span class="keywordtype">int</span> r,c,n,cc;</div><div class="line"><a name="l00353"></a><span class="lineno">  353</span>&#160;    <span class="keywordtype">float</span> D = 0;</div><div class="line"><a name="l00354"></a><span class="lineno">  354</span>&#160;</div><div class="line"><a name="l00355"></a><span class="lineno">  355</span>&#160;    <span class="keywordflow">if</span>(MatA.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a> != MatA.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>)</div><div class="line"><a name="l00356"></a><span class="lineno">  356</span>&#160;    {</div><div class="line"><a name="l00357"></a><span class="lineno">  357</span>&#160;        <span class="comment">//FIXME error</span></div><div class="line"><a name="l00358"></a><span class="lineno">  358</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 1</span></div><div class="line"><a name="l00359"></a><span class="lineno">  359</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Determinate: Matrix MUST be square!\n&quot;</span>);</div><div class="line"><a name="l00360"></a><span class="lineno">  360</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00361"></a><span class="lineno">  361</span>&#160;        <span class="keywordflow">return</span>(D);</div><div class="line"><a name="l00362"></a><span class="lineno">  362</span>&#160;    }</div><div class="line"><a name="l00363"></a><span class="lineno">  363</span>&#160;</div><div class="line"><a name="l00364"></a><span class="lineno">  364</span>&#160;    <span class="keywordflow">if</span> (MatA.<a class="code" href="struct__mat.html#ab54203ad7b60fc23832cb3b2a863857f">size</a> &lt; 1)</div><div class="line"><a name="l00365"></a><span class="lineno">  365</span>&#160;    {</div><div class="line"><a name="l00366"></a><span class="lineno">  366</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 1</span></div><div class="line"><a name="l00367"></a><span class="lineno">  367</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Determinate: Matrix size MUST be &gt; 0!\n&quot;</span>);</div><div class="line"><a name="l00368"></a><span class="lineno">  368</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00369"></a><span class="lineno">  369</span>&#160;        <span class="keywordflow">return</span>(D);</div><div class="line"><a name="l00370"></a><span class="lineno">  370</span>&#160;    }</div><div class="line"><a name="l00371"></a><span class="lineno">  371</span>&#160;    <span class="comment">// 1 x 1 case</span></div><div class="line"><a name="l00372"></a><span class="lineno">  372</span>&#160;    <span class="keywordflow">if</span> (MatA.<a class="code" href="struct__mat.html#ab54203ad7b60fc23832cb3b2a863857f">size</a> == 1)  </div><div class="line"><a name="l00373"></a><span class="lineno">  373</span>&#160;    {</div><div class="line"><a name="l00374"></a><span class="lineno">  374</span>&#160;        D = MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[0][0];</div><div class="line"><a name="l00375"></a><span class="lineno">  375</span>&#160;        <span class="keywordflow">return</span>(D);</div><div class="line"><a name="l00376"></a><span class="lineno">  376</span>&#160;    }</div><div class="line"><a name="l00377"></a><span class="lineno">  377</span>&#160;    <span class="comment">// 2 x 2 case</span></div><div class="line"><a name="l00378"></a><span class="lineno">  378</span>&#160;    <span class="keywordflow">if</span> (MatA.<a class="code" href="struct__mat.html#ab54203ad7b60fc23832cb3b2a863857f">size</a> == 2)</div><div class="line"><a name="l00379"></a><span class="lineno">  379</span>&#160;    {</div><div class="line"><a name="l00380"></a><span class="lineno">  380</span>&#160;        D = MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[0][0] * MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[1][1] - MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[1][0] * MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[0][1];</div><div class="line"><a name="l00381"></a><span class="lineno">  381</span>&#160;        <span class="keywordflow">return</span>(D);</div><div class="line"><a name="l00382"></a><span class="lineno">  382</span>&#160;    }</div><div class="line"><a name="l00383"></a><span class="lineno">  383</span>&#160;    <span class="comment">// solve &gt; 2 cases by recursive Cofactor method</span></div><div class="line"><a name="l00384"></a><span class="lineno">  384</span>&#160;    <span class="keywordflow">for</span> (n=0;n&lt;MatA.<a class="code" href="struct__mat.html#ab54203ad7b60fc23832cb3b2a863857f">size</a>;++n)</div><div class="line"><a name="l00385"></a><span class="lineno">  385</span>&#160;    {</div><div class="line"><a name="l00386"></a><span class="lineno">  386</span>&#160;        D += MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[0][n] * <a class="code" href="matrix_8c.html#aa96a1963cc354fe2a055eae3c846227c">Cofactor</a>(MatA, 0, n);</div><div class="line"><a name="l00387"></a><span class="lineno">  387</span>&#160;    }</div><div class="line"><a name="l00388"></a><span class="lineno">  388</span>&#160;    <span class="keywordflow">return</span>(D);</div><div class="line"><a name="l00389"></a><span class="lineno">  389</span>&#160;}</div><div class="line"><a name="l00390"></a><span class="lineno">  390</span>&#160; </div><div class="line"><a name="l00398"></a><span class="lineno">  398</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00399"></a><span class="lineno"><a class="line" href="matrix_8h.html#a7d4a273868c8ba43d51338aee9310b00">  399</a></span>&#160;<a class="code" href="struct__mat.html">mat_t</a> <a class="code" href="matrix_8c.html#a7d4a273868c8ba43d51338aee9310b00">Invert</a>(<a class="code" href="struct__mat.html">mat_t</a> MatA)</div><div class="line"><a name="l00400"></a><span class="lineno">  400</span>&#160;{</div><div class="line"><a name="l00401"></a><span class="lineno">  401</span>&#160;    <span class="keywordtype">int</span> r,c;</div><div class="line"><a name="l00402"></a><span class="lineno">  402</span>&#160;    <span class="keywordtype">float</span> D;</div><div class="line"><a name="l00403"></a><span class="lineno">  403</span>&#160;</div><div class="line"><a name="l00404"></a><span class="lineno">  404</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatAdj;</div><div class="line"><a name="l00405"></a><span class="lineno">  405</span>&#160; </div><div class="line"><a name="l00406"></a><span class="lineno">  406</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 2</span></div><div class="line"><a name="l00407"></a><span class="lineno">  407</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;MatA\n&quot;</span>);</div><div class="line"><a name="l00408"></a><span class="lineno">  408</span>&#160;    <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatA);</div><div class="line"><a name="l00409"></a><span class="lineno">  409</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00410"></a><span class="lineno">  410</span>&#160;</div><div class="line"><a name="l00411"></a><span class="lineno">  411</span>&#160;    D=<a class="code" href="matrix_8c.html#af4eb7f5eff3cb27e283a27c7fbb53d6a">Determinant</a>(MatA);</div><div class="line"><a name="l00412"></a><span class="lineno">  412</span>&#160;</div><div class="line"><a name="l00413"></a><span class="lineno">  413</span>&#160;    <span class="keywordflow">if</span>(!D)</div><div class="line"><a name="l00414"></a><span class="lineno">  414</span>&#160;    {</div><div class="line"><a name="l00415"></a><span class="lineno">  415</span>&#160;        <span class="comment">//FIXME flag error somehow</span></div><div class="line"><a name="l00416"></a><span class="lineno">  416</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 1</span></div><div class="line"><a name="l00417"></a><span class="lineno">  417</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Determinant(MatA) = 0!\n\n&quot;</span>);</div><div class="line"><a name="l00418"></a><span class="lineno">  418</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00419"></a><span class="lineno">  419</span>&#160;        <span class="keywordflow">return</span>(MatA);</div><div class="line"><a name="l00420"></a><span class="lineno">  420</span>&#160;    }</div><div class="line"><a name="l00421"></a><span class="lineno">  421</span>&#160;</div><div class="line"><a name="l00422"></a><span class="lineno">  422</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 2</span></div><div class="line"><a name="l00423"></a><span class="lineno">  423</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Determinant(MatA):\n%e\n\n&quot;</span>, (<span class="keywordtype">double</span>) D);</div><div class="line"><a name="l00424"></a><span class="lineno">  424</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00425"></a><span class="lineno">  425</span>&#160;</div><div class="line"><a name="l00426"></a><span class="lineno">  426</span>&#160;    MatAdj = <a class="code" href="matrix_8c.html#a5140bc12eedbf802992531ca0ef3f0a8">Adjugate</a>(MatA);</div><div class="line"><a name="l00427"></a><span class="lineno">  427</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 2</span></div><div class="line"><a name="l00428"></a><span class="lineno">  428</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Adjugate(MatA)\n&quot;</span>);</div><div class="line"><a name="l00429"></a><span class="lineno">  429</span>&#160;    <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatAdj);</div><div class="line"><a name="l00430"></a><span class="lineno">  430</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00431"></a><span class="lineno">  431</span>&#160;    <span class="comment">// row</span></div><div class="line"><a name="l00432"></a><span class="lineno">  432</span>&#160;    <span class="keywordflow">for</span> (r=0;r&lt;MatAdj.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>;++r)</div><div class="line"><a name="l00433"></a><span class="lineno">  433</span>&#160;    {</div><div class="line"><a name="l00434"></a><span class="lineno">  434</span>&#160;        <span class="comment">// col</span></div><div class="line"><a name="l00435"></a><span class="lineno">  435</span>&#160;        <span class="keywordflow">for</span> (c=0;c&lt;MatAdj.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>;++c)</div><div class="line"><a name="l00436"></a><span class="lineno">  436</span>&#160;        {</div><div class="line"><a name="l00437"></a><span class="lineno">  437</span>&#160;            MatAdj.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[r][c] /= D;</div><div class="line"><a name="l00438"></a><span class="lineno">  438</span>&#160;        }</div><div class="line"><a name="l00439"></a><span class="lineno">  439</span>&#160;    }</div><div class="line"><a name="l00440"></a><span class="lineno">  440</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 2</span></div><div class="line"><a name="l00441"></a><span class="lineno">  441</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Adjugate(MatA)/Determinant(MatA)\n&quot;</span>);</div><div class="line"><a name="l00442"></a><span class="lineno">  442</span>&#160;    <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatAdj);</div><div class="line"><a name="l00443"></a><span class="lineno">  443</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00444"></a><span class="lineno">  444</span>&#160;</div><div class="line"><a name="l00445"></a><span class="lineno">  445</span>&#160;    <span class="keywordflow">return</span>(MatAdj);</div><div class="line"><a name="l00446"></a><span class="lineno">  446</span>&#160;}</div><div class="line"><a name="l00447"></a><span class="lineno">  447</span>&#160;</div><div class="line"><a name="l00455"></a><span class="lineno">  455</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00456"></a><span class="lineno"><a class="line" href="matrix_8h.html#a2217661f847795248eb975a64539488e">  456</a></span>&#160;<a class="code" href="struct__mat.html">mat_t</a> <a class="code" href="matrix_8c.html#a2217661f847795248eb975a64539488e">PseudoInvert</a>(<a class="code" href="struct__mat.html">mat_t</a> MatA)</div><div class="line"><a name="l00457"></a><span class="lineno">  457</span>&#160;{</div><div class="line"><a name="l00458"></a><span class="lineno">  458</span>&#160;    <span class="comment">// AT = Transpose(A)</span></div><div class="line"><a name="l00459"></a><span class="lineno">  459</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatAT = <a class="code" href="matrix_8c.html#a69e8069902ef085b6c19b391f3379492">Transpose</a>(MatA);</div><div class="line"><a name="l00460"></a><span class="lineno">  460</span>&#160;</div><div class="line"><a name="l00461"></a><span class="lineno">  461</span>&#160;    <span class="comment">// AT * A</span></div><div class="line"><a name="l00462"></a><span class="lineno">  462</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatR = <a class="code" href="matrix_8c.html#a5539a20ee0f152e7f1e38d36b3dfda20">MatMul</a>(MatAT,MatA);</div><div class="line"><a name="l00463"></a><span class="lineno">  463</span>&#160;</div><div class="line"><a name="l00464"></a><span class="lineno">  464</span>&#160;    <span class="comment">// 1/(AT * A)</span></div><div class="line"><a name="l00465"></a><span class="lineno">  465</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatI = <a class="code" href="matrix_8c.html#a7d4a273868c8ba43d51338aee9310b00">Invert</a>(MatR);</div><div class="line"><a name="l00466"></a><span class="lineno">  466</span>&#160;</div><div class="line"><a name="l00467"></a><span class="lineno">  467</span>&#160;    <span class="comment">// Pseudo Inverse (AT × A)–1 × AT\n</span></div><div class="line"><a name="l00468"></a><span class="lineno">  468</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatPI = <a class="code" href="matrix_8c.html#a5539a20ee0f152e7f1e38d36b3dfda20">MatMul</a>(MatI,MatAT);</div><div class="line"><a name="l00469"></a><span class="lineno">  469</span>&#160;</div><div class="line"><a name="l00470"></a><span class="lineno">  470</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatR);</div><div class="line"><a name="l00471"></a><span class="lineno">  471</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatI);</div><div class="line"><a name="l00472"></a><span class="lineno">  472</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatAT);</div><div class="line"><a name="l00473"></a><span class="lineno">  473</span>&#160;    </div><div class="line"><a name="l00474"></a><span class="lineno">  474</span>&#160;    <span class="keywordflow">return</span>(MatPI);</div><div class="line"><a name="l00475"></a><span class="lineno">  475</span>&#160;}</div><div class="line"><a name="l00476"></a><span class="lineno">  476</span>&#160;</div><div class="line"><a name="l00477"></a><span class="lineno">  477</span>&#160;</div><div class="line"><a name="l00489"></a><span class="lineno">  489</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00490"></a><span class="lineno"><a class="line" href="matrix_8h.html#a5539a20ee0f152e7f1e38d36b3dfda20">  490</a></span>&#160;<a class="code" href="struct__mat.html">mat_t</a> <a class="code" href="matrix_8c.html#a5539a20ee0f152e7f1e38d36b3dfda20">MatMul</a>(<a class="code" href="struct__mat.html">mat_t</a> MatA, <a class="code" href="struct__mat.html">mat_t</a> MatB)</div><div class="line"><a name="l00491"></a><span class="lineno">  491</span>&#160;{</div><div class="line"><a name="l00492"></a><span class="lineno">  492</span>&#160;    <span class="keywordtype">float</span> <a class="code" href="posix__tests_8c.html#a8d4059ff64356316a5f13d16cdd90fb5">sum</a> = 0;</div><div class="line"><a name="l00493"></a><span class="lineno">  493</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatR = <a class="code" href="matrix_8c.html#a5595f5b7a290aaeaf2daf98858bbdac2">MatAlloc</a>(MatA.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>,MatB.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>);</div><div class="line"><a name="l00494"></a><span class="lineno">  494</span>&#160;</div><div class="line"><a name="l00495"></a><span class="lineno">  495</span>&#160;    <span class="keywordtype">int</span> rA,cB,rB;</div><div class="line"><a name="l00496"></a><span class="lineno">  496</span>&#160;</div><div class="line"><a name="l00497"></a><span class="lineno">  497</span>&#160;    <span class="keywordflow">if</span> (MatA.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a> != MatB.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>)</div><div class="line"><a name="l00498"></a><span class="lineno">  498</span>&#160;<span class="preprocessor">#if MATDEBUG &amp; 1</span></div><div class="line"><a name="l00499"></a><span class="lineno">  499</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;error MatA cols(%d) != MatB rows(%d)\n&quot;</span>, MatA.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>, MatB.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>);</div><div class="line"><a name="l00500"></a><span class="lineno">  500</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00501"></a><span class="lineno">  501</span>&#160;    </div><div class="line"><a name="l00502"></a><span class="lineno">  502</span>&#160;    <span class="comment">// A row</span></div><div class="line"><a name="l00503"></a><span class="lineno">  503</span>&#160;    <span class="keywordflow">for</span> (rA = 0; rA &lt; MatA.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>; ++rA) </div><div class="line"><a name="l00504"></a><span class="lineno">  504</span>&#160;    {</div><div class="line"><a name="l00505"></a><span class="lineno">  505</span>&#160;        <span class="comment">// col B</span></div><div class="line"><a name="l00506"></a><span class="lineno">  506</span>&#160;        <span class="keywordflow">for</span> (cB = 0; cB &lt; MatB.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>; ++cB) </div><div class="line"><a name="l00507"></a><span class="lineno">  507</span>&#160;        {</div><div class="line"><a name="l00508"></a><span class="lineno">  508</span>&#160;            <span class="comment">// row B</span></div><div class="line"><a name="l00509"></a><span class="lineno">  509</span>&#160;            <span class="keywordflow">for</span> (rB = 0; rB &lt; MatB.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>; ++rB) </div><div class="line"><a name="l00510"></a><span class="lineno">  510</span>&#160;            {</div><div class="line"><a name="l00511"></a><span class="lineno">  511</span>&#160;                sum += (MatA.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[rA][rB] * MatB.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[rB][cB]);</div><div class="line"><a name="l00512"></a><span class="lineno">  512</span>&#160;            }</div><div class="line"><a name="l00513"></a><span class="lineno">  513</span>&#160;            MatR.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[rA][cB] = <a class="code" href="posix__tests_8c.html#a8d4059ff64356316a5f13d16cdd90fb5">sum</a>;</div><div class="line"><a name="l00514"></a><span class="lineno">  514</span>&#160;            sum = 0;</div><div class="line"><a name="l00515"></a><span class="lineno">  515</span>&#160;        }</div><div class="line"><a name="l00516"></a><span class="lineno">  516</span>&#160;    }</div><div class="line"><a name="l00517"></a><span class="lineno">  517</span>&#160;    <span class="keywordflow">return</span>(MatR);</div><div class="line"><a name="l00518"></a><span class="lineno">  518</span>&#160;}</div><div class="line"><a name="l00519"></a><span class="lineno">  519</span>&#160;</div><div class="line"><a name="l00526"></a><span class="lineno">  526</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00527"></a><span class="lineno"><a class="line" href="matrix_8h.html#ad75902878173dfc33c227a75862c9c10">  527</a></span>&#160;<a class="code" href="struct__mat.html">mat_t</a> <a class="code" href="matrix_8c.html#ad75902878173dfc33c227a75862c9c10">MatRead</a>(<span class="keywordtype">char</span> *name)</div><div class="line"><a name="l00528"></a><span class="lineno">  528</span>&#160;{</div><div class="line"><a name="l00529"></a><span class="lineno">  529</span>&#160;</div><div class="line"><a name="l00530"></a><span class="lineno">  530</span>&#160;    <a class="code" href="struct____file.html">FILE</a> *fp;</div><div class="line"><a name="l00531"></a><span class="lineno">  531</span>&#160;    <span class="keywordtype">char</span> *ptr;</div><div class="line"><a name="l00532"></a><span class="lineno">  532</span>&#160;    <span class="keywordtype">int</span> r,c;</div><div class="line"><a name="l00533"></a><span class="lineno">  533</span>&#160;    <span class="keywordtype">int</span> rows = 0;</div><div class="line"><a name="l00534"></a><span class="lineno">  534</span>&#160;    <span class="keywordtype">int</span> cols = 0;</div><div class="line"><a name="l00535"></a><span class="lineno">  535</span>&#160;    <span class="keywordtype">int</span> cnt;</div><div class="line"><a name="l00536"></a><span class="lineno">  536</span>&#160;    <span class="keywordtype">int</span> lines = 0;</div><div class="line"><a name="l00537"></a><span class="lineno">  537</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatR;</div><div class="line"><a name="l00538"></a><span class="lineno">  538</span>&#160;    <span class="keywordtype">char</span> tmp[128];</div><div class="line"><a name="l00539"></a><span class="lineno">  539</span>&#160;</div><div class="line"><a name="l00540"></a><span class="lineno">  540</span>&#160;    MatR.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a> = 0;</div><div class="line"><a name="l00541"></a><span class="lineno">  541</span>&#160;    MatR.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a> = 0;</div><div class="line"><a name="l00542"></a><span class="lineno">  542</span>&#160;    MatR.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a> = <a class="code" href="cpu_8h.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l00543"></a><span class="lineno">  543</span>&#160;</div><div class="line"><a name="l00544"></a><span class="lineno">  544</span>&#160;    fp = <a class="code" href="posix_8c.html#a8e661c338f41695d1a1e70aed6255e2d">fopen</a>(name,<span class="stringliteral">&quot;rb&quot;</span>);</div><div class="line"><a name="l00545"></a><span class="lineno">  545</span>&#160;    <span class="keywordflow">if</span>(fp == <a class="code" href="cpu_8h.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>)</div><div class="line"><a name="l00546"></a><span class="lineno">  546</span>&#160;    {</div><div class="line"><a name="l00547"></a><span class="lineno">  547</span>&#160;        <span class="keywordflow">return</span>(MatR);</div><div class="line"><a name="l00548"></a><span class="lineno">  548</span>&#160;    }</div><div class="line"><a name="l00549"></a><span class="lineno">  549</span>&#160;</div><div class="line"><a name="l00550"></a><span class="lineno">  550</span>&#160;    <span class="comment">// Read Matrix header with rows and columns</span></div><div class="line"><a name="l00551"></a><span class="lineno">  551</span>&#160;    ptr = <a class="code" href="posix_8c.html#a3759827e157badd49d076bd157f508d9">fgets</a>(tmp,253,fp);</div><div class="line"><a name="l00552"></a><span class="lineno">  552</span>&#160;    <span class="keywordflow">if</span>(ptr == <a class="code" href="cpu_8h.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>)</div><div class="line"><a name="l00553"></a><span class="lineno">  553</span>&#160;    {</div><div class="line"><a name="l00554"></a><span class="lineno">  554</span>&#160;        <a class="code" href="posix_8c.html#ad6fd240fec1d65213f34b6e6465a8033">fclose</a>(fp);</div><div class="line"><a name="l00555"></a><span class="lineno">  555</span>&#160;        <span class="keywordflow">return</span>(MatR);</div><div class="line"><a name="l00556"></a><span class="lineno">  556</span>&#160;    }</div><div class="line"><a name="l00557"></a><span class="lineno">  557</span>&#160;    <span class="comment">//printf(&quot;line:%d, %s\n&quot;, lines, tmp);</span></div><div class="line"><a name="l00558"></a><span class="lineno">  558</span>&#160;    ++lines;</div><div class="line"><a name="l00559"></a><span class="lineno">  559</span>&#160;    cnt = <a class="code" href="mathio_8h.html#a79c7a2e931845b0fb6b2fa6d63939de4">sscanf</a>(ptr,<span class="stringliteral">&quot;Matrix R:%d C:%d&quot;</span>, (<span class="keywordtype">int</span> *) &amp;rows, (<span class="keywordtype">int</span> *) &amp;cols);</div><div class="line"><a name="l00560"></a><span class="lineno">  560</span>&#160;    <span class="keywordflow">if</span>(rows &lt; 1 || cols &lt; 1)</div><div class="line"><a name="l00561"></a><span class="lineno">  561</span>&#160;    {</div><div class="line"><a name="l00562"></a><span class="lineno">  562</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;sscanf: %d\n&quot;</span>,cnt);</div><div class="line"><a name="l00563"></a><span class="lineno">  563</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;MatRead expected header: Matrix R:%d C:%d\n&quot;</span>,tmp);</div><div class="line"><a name="l00564"></a><span class="lineno">  564</span>&#160;        <a class="code" href="posix_8c.html#ad6fd240fec1d65213f34b6e6465a8033">fclose</a>(fp);</div><div class="line"><a name="l00565"></a><span class="lineno">  565</span>&#160;        <span class="keywordflow">return</span>(MatR);</div><div class="line"><a name="l00566"></a><span class="lineno">  566</span>&#160;    }</div><div class="line"><a name="l00567"></a><span class="lineno">  567</span>&#160;</div><div class="line"><a name="l00568"></a><span class="lineno">  568</span>&#160;    <span class="comment">// FIXME set limts or just let alloc fail ???</span></div><div class="line"><a name="l00569"></a><span class="lineno">  569</span>&#160;    MatR = <a class="code" href="matrix_8c.html#a5595f5b7a290aaeaf2daf98858bbdac2">MatAlloc</a>(rows,cols);</div><div class="line"><a name="l00570"></a><span class="lineno">  570</span>&#160;    <span class="keywordflow">if</span>(MatR.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a> == <a class="code" href="cpu_8h.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>)</div><div class="line"><a name="l00571"></a><span class="lineno">  571</span>&#160;    {</div><div class="line"><a name="l00572"></a><span class="lineno">  572</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;MatRead(%s: &amp;d,&amp;d) could not alloc memory\n&quot;</span>, name, rows,cols);</div><div class="line"><a name="l00573"></a><span class="lineno">  573</span>&#160;        <a class="code" href="posix_8c.html#ad6fd240fec1d65213f34b6e6465a8033">fclose</a>(fp);</div><div class="line"><a name="l00574"></a><span class="lineno">  574</span>&#160;        <span class="keywordflow">return</span>(MatR);</div><div class="line"><a name="l00575"></a><span class="lineno">  575</span>&#160;    }</div><div class="line"><a name="l00576"></a><span class="lineno">  576</span>&#160;    </div><div class="line"><a name="l00577"></a><span class="lineno">  577</span>&#160;    <span class="keywordflow">for</span>(r=0;r&lt;rows;++r)</div><div class="line"><a name="l00578"></a><span class="lineno">  578</span>&#160;    {</div><div class="line"><a name="l00579"></a><span class="lineno">  579</span>&#160;        <span class="comment">// Read rows and columns</span></div><div class="line"><a name="l00580"></a><span class="lineno">  580</span>&#160;        ptr = <a class="code" href="posix_8c.html#a3759827e157badd49d076bd157f508d9">fgets</a>(tmp,253,fp);</div><div class="line"><a name="l00581"></a><span class="lineno">  581</span>&#160;        <span class="comment">//printf(&quot;line:%d, %s\n&quot;, lines, tmp);</span></div><div class="line"><a name="l00582"></a><span class="lineno">  582</span>&#160;        ++lines;</div><div class="line"><a name="l00583"></a><span class="lineno">  583</span>&#160;        <span class="keywordflow">if</span>(ptr == <a class="code" href="cpu_8h.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>)</div><div class="line"><a name="l00584"></a><span class="lineno">  584</span>&#160;        {</div><div class="line"><a name="l00585"></a><span class="lineno">  585</span>&#160;            <a class="code" href="posix_8c.html#ad6fd240fec1d65213f34b6e6465a8033">fclose</a>(fp);</div><div class="line"><a name="l00586"></a><span class="lineno">  586</span>&#160;            <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatR);</div><div class="line"><a name="l00587"></a><span class="lineno">  587</span>&#160;            <span class="keywordflow">return</span>(MatR);</div><div class="line"><a name="l00588"></a><span class="lineno">  588</span>&#160;        }</div><div class="line"><a name="l00589"></a><span class="lineno">  589</span>&#160;        <span class="keywordflow">for</span>(c=0;c&lt;cols;++c)</div><div class="line"><a name="l00590"></a><span class="lineno">  590</span>&#160;        {</div><div class="line"><a name="l00591"></a><span class="lineno">  591</span>&#160;            MatR.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[r][c] = <a class="code" href="mathio_8h.html#a581d4eb5e2c88dd6a011ed595bf413f8">strtod</a>(ptr,&amp;ptr);</div><div class="line"><a name="l00592"></a><span class="lineno">  592</span>&#160;        }</div><div class="line"><a name="l00593"></a><span class="lineno">  593</span>&#160;    }</div><div class="line"><a name="l00594"></a><span class="lineno">  594</span>&#160;    <a class="code" href="posix_8c.html#ad6fd240fec1d65213f34b6e6465a8033">fclose</a>(fp);</div><div class="line"><a name="l00595"></a><span class="lineno">  595</span>&#160;    <span class="keywordflow">return</span>(MatR);</div><div class="line"><a name="l00596"></a><span class="lineno">  596</span>&#160;}</div><div class="line"><a name="l00597"></a><span class="lineno">  597</span>&#160;</div><div class="line"><a name="l00604"></a><span class="lineno">  604</span>&#160;<a class="code" href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="line"><a name="l00605"></a><span class="lineno"><a class="line" href="matrix_8h.html#a6b1e8be5bc0c3a79a81e4254bbd8e6a5">  605</a></span>&#160;<span class="keywordtype">int</span> <a class="code" href="matrix_8c.html#a6b1e8be5bc0c3a79a81e4254bbd8e6a5">MatWrite</a>(<span class="keywordtype">char</span> *name, <a class="code" href="struct__mat.html">mat_t</a> MatW)</div><div class="line"><a name="l00606"></a><span class="lineno">  606</span>&#160;{</div><div class="line"><a name="l00607"></a><span class="lineno">  607</span>&#160;</div><div class="line"><a name="l00608"></a><span class="lineno">  608</span>&#160;    <a class="code" href="struct____file.html">FILE</a> *fp;</div><div class="line"><a name="l00609"></a><span class="lineno">  609</span>&#160;    <span class="keywordtype">int</span> r,c;</div><div class="line"><a name="l00610"></a><span class="lineno">  610</span>&#160;</div><div class="line"><a name="l00611"></a><span class="lineno">  611</span>&#160;    fp = <a class="code" href="posix_8c.html#a8e661c338f41695d1a1e70aed6255e2d">fopen</a>(name,<span class="stringliteral">&quot;wb&quot;</span>);</div><div class="line"><a name="l00612"></a><span class="lineno">  612</span>&#160;    <span class="keywordflow">if</span>(fp == <a class="code" href="cpu_8h.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>)</div><div class="line"><a name="l00613"></a><span class="lineno">  613</span>&#160;    {</div><div class="line"><a name="l00614"></a><span class="lineno">  614</span>&#160;        <span class="keywordflow">return</span>(0);</div><div class="line"><a name="l00615"></a><span class="lineno">  615</span>&#160;    }</div><div class="line"><a name="l00616"></a><span class="lineno">  616</span>&#160;</div><div class="line"><a name="l00617"></a><span class="lineno">  617</span>&#160;    <a class="code" href="posix_8c.html#a91ade11061b9b43b1edd37ff32f76591">fprintf</a>(fp,<span class="stringliteral">&quot;Matrix R:%d C:%d\n&quot;</span>,MatW.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>,MatW.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>);</div><div class="line"><a name="l00618"></a><span class="lineno">  618</span>&#160;    <span class="keywordflow">for</span>(r=0;r&lt;MatW.<a class="code" href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">rows</a>;++r)</div><div class="line"><a name="l00619"></a><span class="lineno">  619</span>&#160;    {</div><div class="line"><a name="l00620"></a><span class="lineno">  620</span>&#160;        <span class="keywordflow">for</span>(c=0;c&lt;MatW.<a class="code" href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">cols</a>;++c)</div><div class="line"><a name="l00621"></a><span class="lineno">  621</span>&#160;        {</div><div class="line"><a name="l00622"></a><span class="lineno">  622</span>&#160;            <a class="code" href="posix_8c.html#a91ade11061b9b43b1edd37ff32f76591">fprintf</a>(fp,<span class="stringliteral">&quot;%e &quot;</span>, (<span class="keywordtype">double</span>) MatW.<a class="code" href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">data</a>[r][c]);</div><div class="line"><a name="l00623"></a><span class="lineno">  623</span>&#160;        }</div><div class="line"><a name="l00624"></a><span class="lineno">  624</span>&#160;        <a class="code" href="posix_8c.html#a91ade11061b9b43b1edd37ff32f76591">fprintf</a>(fp,<span class="stringliteral">&quot;\n&quot;</span>);</div><div class="line"><a name="l00625"></a><span class="lineno">  625</span>&#160;    }</div><div class="line"><a name="l00626"></a><span class="lineno">  626</span>&#160;    <a class="code" href="posix_8c.html#ad6fd240fec1d65213f34b6e6465a8033">fclose</a>(fp);</div><div class="line"><a name="l00627"></a><span class="lineno">  627</span>&#160;    <span class="keywordflow">return</span>(1);</div><div class="line"><a name="l00628"></a><span class="lineno">  628</span>&#160;}</div><div class="line"><a name="l00629"></a><span class="lineno">  629</span>&#160;</div><div class="line"><a name="l00630"></a><span class="lineno">  630</span>&#160;    </div><div class="line"><a name="l00631"></a><span class="lineno">  631</span>&#160;<span class="preprocessor">#ifdef MATTEST</span></div><div class="line"><a name="l00632"></a><span class="lineno">  632</span>&#160;<span class="comment">// =============================================</span></div><div class="line"><a name="l00633"></a><span class="lineno">  633</span>&#160;<span class="comment">// test1</span></div><div class="line"><a name="l00634"></a><span class="lineno">  634</span>&#160;<span class="comment">// compute Adj(AJ)</span></div><div class="line"><a name="l00635"></a><span class="lineno">  635</span>&#160;</div><div class="line"><a name="l00636"></a><span class="lineno">  636</span>&#160;<span class="keywordtype">float</span> AJ[3][3] =</div><div class="line"><a name="l00637"></a><span class="lineno">  637</span>&#160;{</div><div class="line"><a name="l00638"></a><span class="lineno">  638</span>&#160;    { -3, 2, -5 },</div><div class="line"><a name="l00639"></a><span class="lineno">  639</span>&#160;    { -1, 0, -2 },</div><div class="line"><a name="l00640"></a><span class="lineno">  640</span>&#160;    {  3, -4, 1 }</div><div class="line"><a name="l00641"></a><span class="lineno">  641</span>&#160;};</div><div class="line"><a name="l00642"></a><span class="lineno">  642</span>&#160;</div><div class="line"><a name="l00643"></a><span class="lineno">  643</span>&#160;<span class="comment">// =============================================</span></div><div class="line"><a name="l00644"></a><span class="lineno">  644</span>&#160;<span class="comment">// test2</span></div><div class="line"><a name="l00645"></a><span class="lineno">  645</span>&#160;<span class="comment">// Matrix Multiplication</span></div><div class="line"><a name="l00646"></a><span class="lineno">  646</span>&#160;<span class="comment">// compute C * D</span></div><div class="line"><a name="l00647"></a><span class="lineno">  647</span>&#160;</div><div class="line"><a name="l00648"></a><span class="lineno">  648</span>&#160;<span class="keywordtype">float</span> C[3][3] = </div><div class="line"><a name="l00649"></a><span class="lineno">  649</span>&#160;{</div><div class="line"><a name="l00650"></a><span class="lineno">  650</span>&#160;    { 1,2,0 },</div><div class="line"><a name="l00651"></a><span class="lineno">  651</span>&#160;    { 0, 1, 1 },</div><div class="line"><a name="l00652"></a><span class="lineno">  652</span>&#160;    { 2, 0, 1 }</div><div class="line"><a name="l00653"></a><span class="lineno">  653</span>&#160;};</div><div class="line"><a name="l00654"></a><span class="lineno">  654</span>&#160;<span class="keywordtype">float</span> D[3][3] = </div><div class="line"><a name="l00655"></a><span class="lineno">  655</span>&#160;{</div><div class="line"><a name="l00656"></a><span class="lineno">  656</span>&#160;    { 1, 1, 2 },</div><div class="line"><a name="l00657"></a><span class="lineno">  657</span>&#160;    { 2, 1, 1 },</div><div class="line"><a name="l00658"></a><span class="lineno">  658</span>&#160;    { 1, 2, 1 }</div><div class="line"><a name="l00659"></a><span class="lineno">  659</span>&#160;};</div><div class="line"><a name="l00660"></a><span class="lineno">  660</span>&#160;</div><div class="line"><a name="l00661"></a><span class="lineno">  661</span>&#160;<span class="comment">// =============================================</span></div><div class="line"><a name="l00662"></a><span class="lineno">  662</span>&#160;<span class="comment">// test3</span></div><div class="line"><a name="l00663"></a><span class="lineno">  663</span>&#160;<span class="comment">// Test functions required for 3 point screen calibration</span></div><div class="line"><a name="l00664"></a><span class="lineno">  664</span>&#160;<span class="comment">// See: https://www.maximintegrated.com/en/app-notes/index.mvp/id/5296</span></div><div class="line"><a name="l00665"></a><span class="lineno">  665</span>&#160;<span class="comment">//      Calibration in touch-screen systems</span></div><div class="line"><a name="l00666"></a><span class="lineno">  666</span>&#160;<span class="comment">//</span></div><div class="line"><a name="l00667"></a><span class="lineno">  667</span>&#160;<span class="comment">// Calculation</span></div><div class="line"><a name="l00668"></a><span class="lineno">  668</span>&#160;<span class="comment">// 1/A * X</span></div><div class="line"><a name="l00669"></a><span class="lineno">  669</span>&#160;<span class="comment">// 1/A * Y</span></div><div class="line"><a name="l00670"></a><span class="lineno">  670</span>&#160;<span class="comment">//</span></div><div class="line"><a name="l00671"></a><span class="lineno">  671</span>&#160;<span class="comment">// Answer should be</span></div><div class="line"><a name="l00672"></a><span class="lineno">  672</span>&#160;<span class="comment">// xd = 0.0635 x + 0.0024 y + 18.9116</span></div><div class="line"><a name="l00673"></a><span class="lineno">  673</span>&#160;<span class="comment">// yd = -0.0227 x + 0.1634 y + 37.8887</span></div><div class="line"><a name="l00674"></a><span class="lineno">  674</span>&#160;<span class="comment">//  Where (x, y) are touch panel coordinates </span></div><div class="line"><a name="l00675"></a><span class="lineno">  675</span>&#160;<span class="comment">//  and (xd, yd) is the adjusted screen coordinate </span></div><div class="line"><a name="l00676"></a><span class="lineno">  676</span>&#160;<span class="keywordtype">float</span> A3[3][3] = {</div><div class="line"><a name="l00677"></a><span class="lineno">  677</span>&#160;    { 650, 2000, 1 },</div><div class="line"><a name="l00678"></a><span class="lineno">  678</span>&#160;    { 2800, 1350, 1 },</div><div class="line"><a name="l00679"></a><span class="lineno">  679</span>&#160;    { 2640, 3500, 1 }</div><div class="line"><a name="l00680"></a><span class="lineno">  680</span>&#160;};</div><div class="line"><a name="l00681"></a><span class="lineno">  681</span>&#160;</div><div class="line"><a name="l00682"></a><span class="lineno">  682</span>&#160;<span class="keywordtype">float</span> X3[3][1] = </div><div class="line"><a name="l00683"></a><span class="lineno">  683</span>&#160;{ </div><div class="line"><a name="l00684"></a><span class="lineno">  684</span>&#160;    {65},</div><div class="line"><a name="l00685"></a><span class="lineno">  685</span>&#160;    {200},</div><div class="line"><a name="l00686"></a><span class="lineno">  686</span>&#160;    {195}</div><div class="line"><a name="l00687"></a><span class="lineno">  687</span>&#160;};</div><div class="line"><a name="l00688"></a><span class="lineno">  688</span>&#160;</div><div class="line"><a name="l00689"></a><span class="lineno">  689</span>&#160;<span class="keywordtype">float</span> Y3[3][1] = </div><div class="line"><a name="l00690"></a><span class="lineno">  690</span>&#160;{   </div><div class="line"><a name="l00691"></a><span class="lineno">  691</span>&#160;    {350},</div><div class="line"><a name="l00692"></a><span class="lineno">  692</span>&#160;    {195},</div><div class="line"><a name="l00693"></a><span class="lineno">  693</span>&#160;    {550}</div><div class="line"><a name="l00694"></a><span class="lineno">  694</span>&#160;};</div><div class="line"><a name="l00695"></a><span class="lineno">  695</span>&#160;</div><div class="line"><a name="l00696"></a><span class="lineno">  696</span>&#160;<span class="comment">// =============================================</span></div><div class="line"><a name="l00697"></a><span class="lineno">  697</span>&#160;<span class="comment">// test4</span></div><div class="line"><a name="l00698"></a><span class="lineno">  698</span>&#160;<span class="comment">// Test functions required for 5 point screen calibration</span></div><div class="line"><a name="l00699"></a><span class="lineno">  699</span>&#160;<span class="comment">// See: https://www.maximintegrated.com/en/app-notes/index.mvp/id/5296</span></div><div class="line"><a name="l00700"></a><span class="lineno">  700</span>&#160;<span class="comment">//      Calibration in touch-screen systems</span></div><div class="line"><a name="l00701"></a><span class="lineno">  701</span>&#160;<span class="comment">//</span></div><div class="line"><a name="l00702"></a><span class="lineno">  702</span>&#160;<span class="comment">// Calculation - note: AT = transpose(A)</span></div><div class="line"><a name="l00703"></a><span class="lineno">  703</span>&#160;<span class="comment">// (1/(AT * A) * AT) * X</span></div><div class="line"><a name="l00704"></a><span class="lineno">  704</span>&#160;<span class="comment">// (1/(AT * A) * AT) * Y</span></div><div class="line"><a name="l00705"></a><span class="lineno">  705</span>&#160;<span class="comment">//</span></div><div class="line"><a name="l00706"></a><span class="lineno">  706</span>&#160;<span class="comment">// Answer should be</span></div><div class="line"><a name="l00707"></a><span class="lineno">  707</span>&#160;<span class="comment">//  xd = 0.0677 x + 0.0190 y - 33.7973</span></div><div class="line"><a name="l00708"></a><span class="lineno">  708</span>&#160;<span class="comment">//  yd = -0.0347 x + 0.2100 y - 27.4030</span></div><div class="line"><a name="l00709"></a><span class="lineno">  709</span>&#160;<span class="comment">//  Where (x, y) are touch panel coordinates </span></div><div class="line"><a name="l00710"></a><span class="lineno">  710</span>&#160;<span class="comment">//  and (xd, yd) is the adjusted screen coordinate </span></div><div class="line"><a name="l00711"></a><span class="lineno">  711</span>&#160;</div><div class="line"><a name="l00712"></a><span class="lineno">  712</span>&#160;</div><div class="line"><a name="l00713"></a><span class="lineno">  713</span>&#160;<span class="keywordtype">float</span> A5[5][3] = {</div><div class="line"><a name="l00714"></a><span class="lineno">  714</span>&#160;    { 1700, 2250, 1 },</div><div class="line"><a name="l00715"></a><span class="lineno">  715</span>&#160;    { 750, 1200, 1 },</div><div class="line"><a name="l00716"></a><span class="lineno">  716</span>&#160;    { 3000, 1500, 1 },</div><div class="line"><a name="l00717"></a><span class="lineno">  717</span>&#160;    { 2500, 3400, 1 },</div><div class="line"><a name="l00718"></a><span class="lineno">  718</span>&#160;    { 600, 3000, 1 }</div><div class="line"><a name="l00719"></a><span class="lineno">  719</span>&#160;};</div><div class="line"><a name="l00720"></a><span class="lineno">  720</span>&#160;</div><div class="line"><a name="l00721"></a><span class="lineno">  721</span>&#160;<span class="keywordtype">float</span> X5[5][1] = </div><div class="line"><a name="l00722"></a><span class="lineno">  722</span>&#160;{ </div><div class="line"><a name="l00723"></a><span class="lineno">  723</span>&#160;    {100},</div><div class="line"><a name="l00724"></a><span class="lineno">  724</span>&#160;    {50},</div><div class="line"><a name="l00725"></a><span class="lineno">  725</span>&#160;    {200},</div><div class="line"><a name="l00726"></a><span class="lineno">  726</span>&#160;    {210},</div><div class="line"><a name="l00727"></a><span class="lineno">  727</span>&#160;    {65}</div><div class="line"><a name="l00728"></a><span class="lineno">  728</span>&#160;};</div><div class="line"><a name="l00729"></a><span class="lineno">  729</span>&#160;</div><div class="line"><a name="l00730"></a><span class="lineno">  730</span>&#160;<span class="keywordtype">float</span> Y5[5][1] = </div><div class="line"><a name="l00731"></a><span class="lineno">  731</span>&#160;{   </div><div class="line"><a name="l00732"></a><span class="lineno">  732</span>&#160;    {350},</div><div class="line"><a name="l00733"></a><span class="lineno">  733</span>&#160;    {200},</div><div class="line"><a name="l00734"></a><span class="lineno">  734</span>&#160;    {200},</div><div class="line"><a name="l00735"></a><span class="lineno">  735</span>&#160;    {600},</div><div class="line"><a name="l00736"></a><span class="lineno">  736</span>&#160;    {600}</div><div class="line"><a name="l00737"></a><span class="lineno">  737</span>&#160;};</div><div class="line"><a name="l00738"></a><span class="lineno">  738</span>&#160;</div><div class="line"><a name="l00739"></a><span class="lineno">  739</span>&#160;<span class="keywordtype">int</span> <a class="code" href="send_8c.html#a0ddf1224851353fc92bfbff6f499fa97">main</a>(<span class="keywordtype">int</span> argc, <span class="keywordtype">char</span> *argv[])</div><div class="line"><a name="l00740"></a><span class="lineno">  740</span>&#160;{</div><div class="line"><a name="l00741"></a><span class="lineno">  741</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatA,MatX,MatY;</div><div class="line"><a name="l00742"></a><span class="lineno">  742</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatI;</div><div class="line"><a name="l00743"></a><span class="lineno">  743</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatPI;</div><div class="line"><a name="l00744"></a><span class="lineno">  744</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatC,MatD;</div><div class="line"><a name="l00745"></a><span class="lineno">  745</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatR;</div><div class="line"><a name="l00746"></a><span class="lineno">  746</span>&#160;    <a class="code" href="struct__mat.html">mat_t</a> MatAdj;</div><div class="line"><a name="l00747"></a><span class="lineno">  747</span>&#160;</div><div class="line"><a name="l00748"></a><span class="lineno">  748</span>&#160;</div><div class="line"><a name="l00749"></a><span class="lineno">  749</span>&#160;    <span class="comment">// =============================</span></div><div class="line"><a name="l00750"></a><span class="lineno">  750</span>&#160;    <span class="comment">// test Adjugate</span></div><div class="line"><a name="l00751"></a><span class="lineno">  751</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;==========================================\n&quot;</span>);</div><div class="line"><a name="l00752"></a><span class="lineno">  752</span>&#160;    MatA = <a class="code" href="matrix_8c.html#ad8c8055df2f89f410d49002690ede4cf">MatLoad</a>(AJ,3,3);</div><div class="line"><a name="l00753"></a><span class="lineno">  753</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;MatA\n&quot;</span>);</div><div class="line"><a name="l00754"></a><span class="lineno">  754</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatA);</div><div class="line"><a name="l00755"></a><span class="lineno">  755</span>&#160;    MatAdj = <a class="code" href="matrix_8c.html#a5140bc12eedbf802992531ca0ef3f0a8">Adjugate</a>(MatA);</div><div class="line"><a name="l00756"></a><span class="lineno">  756</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Adjugate(MatA)\n&quot;</span>);</div><div class="line"><a name="l00757"></a><span class="lineno">  757</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatAdj);</div><div class="line"><a name="l00758"></a><span class="lineno">  758</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatAdj);</div><div class="line"><a name="l00759"></a><span class="lineno">  759</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatA);</div><div class="line"><a name="l00760"></a><span class="lineno">  760</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;==========================================\n&quot;</span>);</div><div class="line"><a name="l00761"></a><span class="lineno">  761</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;\n&quot;</span>);</div><div class="line"><a name="l00762"></a><span class="lineno">  762</span>&#160;</div><div class="line"><a name="l00763"></a><span class="lineno">  763</span>&#160;    <span class="comment">// =============================</span></div><div class="line"><a name="l00764"></a><span class="lineno">  764</span>&#160;    <span class="comment">// test MatMul</span></div><div class="line"><a name="l00765"></a><span class="lineno">  765</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;==========================================\n&quot;</span>);</div><div class="line"><a name="l00766"></a><span class="lineno">  766</span>&#160;    MatC = <a class="code" href="matrix_8c.html#ad554fcd60a6674448de06fbfc40d41d0">MatLoadSQ</a>(C,3);</div><div class="line"><a name="l00767"></a><span class="lineno">  767</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;MatC\n&quot;</span>);</div><div class="line"><a name="l00768"></a><span class="lineno">  768</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatC);</div><div class="line"><a name="l00769"></a><span class="lineno">  769</span>&#160;    MatD = <a class="code" href="matrix_8c.html#ad554fcd60a6674448de06fbfc40d41d0">MatLoadSQ</a>(D,3);</div><div class="line"><a name="l00770"></a><span class="lineno">  770</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;MatD\n&quot;</span>);</div><div class="line"><a name="l00771"></a><span class="lineno">  771</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatD);</div><div class="line"><a name="l00772"></a><span class="lineno">  772</span>&#160;    MatR = <a class="code" href="matrix_8c.html#a5539a20ee0f152e7f1e38d36b3dfda20">MatMul</a>(MatC,MatD);</div><div class="line"><a name="l00773"></a><span class="lineno">  773</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;MatC * MatD\n&quot;</span>);</div><div class="line"><a name="l00774"></a><span class="lineno">  774</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatR);</div><div class="line"><a name="l00775"></a><span class="lineno">  775</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatC);</div><div class="line"><a name="l00776"></a><span class="lineno">  776</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatD);</div><div class="line"><a name="l00777"></a><span class="lineno">  777</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatR);</div><div class="line"><a name="l00778"></a><span class="lineno">  778</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;==========================================\n&quot;</span>);</div><div class="line"><a name="l00779"></a><span class="lineno">  779</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;\n&quot;</span>);</div><div class="line"><a name="l00780"></a><span class="lineno">  780</span>&#160;</div><div class="line"><a name="l00781"></a><span class="lineno">  781</span>&#160;    <span class="comment">// ===============================================================</span></div><div class="line"><a name="l00782"></a><span class="lineno">  782</span>&#160;    <span class="comment">// ===============================================================</span></div><div class="line"><a name="l00783"></a><span class="lineno">  783</span>&#160;    <span class="comment">// Test functions required for 3 point screen calibration</span></div><div class="line"><a name="l00784"></a><span class="lineno">  784</span>&#160;    <span class="comment">// See: https://www.maximintegrated.com/en/app-notes/index.mvp/id/5296</span></div><div class="line"><a name="l00785"></a><span class="lineno">  785</span>&#160;    <span class="comment">//      Calibration in touch-screen systems</span></div><div class="line"><a name="l00786"></a><span class="lineno">  786</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;==========================================\n&quot;</span>);</div><div class="line"><a name="l00787"></a><span class="lineno">  787</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Set of three display positions\n&quot;</span>);</div><div class="line"><a name="l00788"></a><span class="lineno">  788</span>&#160;    MatX = <a class="code" href="matrix_8c.html#ad8c8055df2f89f410d49002690ede4cf">MatLoad</a>(X3,3,1);</div><div class="line"><a name="l00789"></a><span class="lineno">  789</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;X\n&quot;</span>);</div><div class="line"><a name="l00790"></a><span class="lineno">  790</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatX);</div><div class="line"><a name="l00791"></a><span class="lineno">  791</span>&#160;</div><div class="line"><a name="l00792"></a><span class="lineno">  792</span>&#160;    MatY = <a class="code" href="matrix_8c.html#ad8c8055df2f89f410d49002690ede4cf">MatLoad</a>(Y3,3,1);</div><div class="line"><a name="l00793"></a><span class="lineno">  793</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Y\n&quot;</span>);</div><div class="line"><a name="l00794"></a><span class="lineno">  794</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatY);</div><div class="line"><a name="l00795"></a><span class="lineno">  795</span>&#160;</div><div class="line"><a name="l00796"></a><span class="lineno">  796</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Correponding touch screen positions, differing scale and skew\n&quot;</span>);</div><div class="line"><a name="l00797"></a><span class="lineno">  797</span>&#160;    MatA = <a class="code" href="matrix_8c.html#ad554fcd60a6674448de06fbfc40d41d0">MatLoadSQ</a>(A3,3);</div><div class="line"><a name="l00798"></a><span class="lineno">  798</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;A\n&quot;</span>);</div><div class="line"><a name="l00799"></a><span class="lineno">  799</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatA);</div><div class="line"><a name="l00800"></a><span class="lineno">  800</span>&#160;</div><div class="line"><a name="l00801"></a><span class="lineno">  801</span>&#160;    <span class="comment">// 1/A</span></div><div class="line"><a name="l00802"></a><span class="lineno">  802</span>&#160;    MatI = <a class="code" href="matrix_8c.html#a7d4a273868c8ba43d51338aee9310b00">Invert</a>(MatA);</div><div class="line"><a name="l00803"></a><span class="lineno">  803</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;1/(A)\n&quot;</span>);</div><div class="line"><a name="l00804"></a><span class="lineno">  804</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatI);</div><div class="line"><a name="l00805"></a><span class="lineno">  805</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatA);</div><div class="line"><a name="l00806"></a><span class="lineno">  806</span>&#160;</div><div class="line"><a name="l00807"></a><span class="lineno">  807</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Solution Matrix to translate touch screen to screen positions\n&quot;</span>);</div><div class="line"><a name="l00808"></a><span class="lineno">  808</span>&#160;    <span class="comment">// MatR = 1/A * X</span></div><div class="line"><a name="l00809"></a><span class="lineno">  809</span>&#160;    MatR = <a class="code" href="matrix_8c.html#a5539a20ee0f152e7f1e38d36b3dfda20">MatMul</a>(MatI,MatX);</div><div class="line"><a name="l00810"></a><span class="lineno">  810</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;1/A * X\n&quot;</span>);</div><div class="line"><a name="l00811"></a><span class="lineno">  811</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatR);</div><div class="line"><a name="l00812"></a><span class="lineno">  812</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatR);</div><div class="line"><a name="l00813"></a><span class="lineno">  813</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatX);</div><div class="line"><a name="l00814"></a><span class="lineno">  814</span>&#160;</div><div class="line"><a name="l00815"></a><span class="lineno">  815</span>&#160;    <span class="comment">// MatR = 1/A * Y</span></div><div class="line"><a name="l00816"></a><span class="lineno">  816</span>&#160;    MatR = <a class="code" href="matrix_8c.html#a5539a20ee0f152e7f1e38d36b3dfda20">MatMul</a>(MatI,MatY);</div><div class="line"><a name="l00817"></a><span class="lineno">  817</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;1/A * Y\n&quot;</span>);</div><div class="line"><a name="l00818"></a><span class="lineno">  818</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatR);</div><div class="line"><a name="l00819"></a><span class="lineno">  819</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatR);</div><div class="line"><a name="l00820"></a><span class="lineno">  820</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatY);</div><div class="line"><a name="l00821"></a><span class="lineno">  821</span>&#160;</div><div class="line"><a name="l00822"></a><span class="lineno">  822</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatI);</div><div class="line"><a name="l00823"></a><span class="lineno">  823</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;==========================================\n&quot;</span>);</div><div class="line"><a name="l00824"></a><span class="lineno">  824</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;\n&quot;</span>);</div><div class="line"><a name="l00825"></a><span class="lineno">  825</span>&#160;</div><div class="line"><a name="l00826"></a><span class="lineno">  826</span>&#160;    <span class="comment">// ===============================================================</span></div><div class="line"><a name="l00827"></a><span class="lineno">  827</span>&#160;    <span class="comment">// ===============================================================</span></div><div class="line"><a name="l00828"></a><span class="lineno">  828</span>&#160;    <span class="comment">// Test functions required for N point screen calibration</span></div><div class="line"><a name="l00829"></a><span class="lineno">  829</span>&#160;    <span class="comment">// Use least square solution by Pseudo Invert method</span></div><div class="line"><a name="l00830"></a><span class="lineno">  830</span>&#160;    <span class="comment">// See: https://www.maximintegrated.com/en/app-notes/index.mvp/id/5296</span></div><div class="line"><a name="l00831"></a><span class="lineno">  831</span>&#160;    <span class="comment">//      Calibration in touch-screen systems</span></div><div class="line"><a name="l00832"></a><span class="lineno">  832</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;==========================================\n&quot;</span>);</div><div class="line"><a name="l00833"></a><span class="lineno">  833</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Set of five display positions\n&quot;</span>);</div><div class="line"><a name="l00834"></a><span class="lineno">  834</span>&#160;    MatX = <a class="code" href="matrix_8c.html#ad8c8055df2f89f410d49002690ede4cf">MatLoad</a>(X5,5,1);</div><div class="line"><a name="l00835"></a><span class="lineno">  835</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;X\n&quot;</span>);</div><div class="line"><a name="l00836"></a><span class="lineno">  836</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatX);</div><div class="line"><a name="l00837"></a><span class="lineno">  837</span>&#160;</div><div class="line"><a name="l00838"></a><span class="lineno">  838</span>&#160;    MatY = <a class="code" href="matrix_8c.html#ad8c8055df2f89f410d49002690ede4cf">MatLoad</a>(Y5,5,1);</div><div class="line"><a name="l00839"></a><span class="lineno">  839</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Y\n&quot;</span>);</div><div class="line"><a name="l00840"></a><span class="lineno">  840</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatY);</div><div class="line"><a name="l00841"></a><span class="lineno">  841</span>&#160;</div><div class="line"><a name="l00842"></a><span class="lineno">  842</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Correponding touch screen positions, differing scale and skew\n&quot;</span>);</div><div class="line"><a name="l00843"></a><span class="lineno">  843</span>&#160;    MatA = <a class="code" href="matrix_8c.html#ad8c8055df2f89f410d49002690ede4cf">MatLoad</a>(A5,5,3);</div><div class="line"><a name="l00844"></a><span class="lineno">  844</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;A\n&quot;</span>);</div><div class="line"><a name="l00845"></a><span class="lineno">  845</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatA);</div><div class="line"><a name="l00846"></a><span class="lineno">  846</span>&#160;</div><div class="line"><a name="l00847"></a><span class="lineno">  847</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Compute pseudo-inverse matrix, 1/(AT × A) × AT\n&quot;</span>);</div><div class="line"><a name="l00848"></a><span class="lineno">  848</span>&#160;    MatPI = <a class="code" href="matrix_8c.html#a2217661f847795248eb975a64539488e">PseudoInvert</a>(MatA);</div><div class="line"><a name="l00849"></a><span class="lineno">  849</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;PI = Pseudo Invert(A)\n&quot;</span>);</div><div class="line"><a name="l00850"></a><span class="lineno">  850</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatPI);</div><div class="line"><a name="l00851"></a><span class="lineno">  851</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatA);</div><div class="line"><a name="l00852"></a><span class="lineno">  852</span>&#160;</div><div class="line"><a name="l00853"></a><span class="lineno">  853</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;Solution Matrix to translate touch screen to screen positions\n&quot;</span>);</div><div class="line"><a name="l00854"></a><span class="lineno">  854</span>&#160;    <span class="comment">// MatR = PI * X</span></div><div class="line"><a name="l00855"></a><span class="lineno">  855</span>&#160;    MatR = <a class="code" href="matrix_8c.html#a5539a20ee0f152e7f1e38d36b3dfda20">MatMul</a>(MatPI,MatX);</div><div class="line"><a name="l00856"></a><span class="lineno">  856</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;(R = PI * X\n&quot;</span>);</div><div class="line"><a name="l00857"></a><span class="lineno">  857</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatR);</div><div class="line"><a name="l00858"></a><span class="lineno">  858</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatR);</div><div class="line"><a name="l00859"></a><span class="lineno">  859</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatX);</div><div class="line"><a name="l00860"></a><span class="lineno">  860</span>&#160;</div><div class="line"><a name="l00861"></a><span class="lineno">  861</span>&#160;    <span class="comment">// MatR = 1/A * Y</span></div><div class="line"><a name="l00862"></a><span class="lineno">  862</span>&#160;    MatR = <a class="code" href="matrix_8c.html#a5539a20ee0f152e7f1e38d36b3dfda20">MatMul</a>(MatPI,MatY);</div><div class="line"><a name="l00863"></a><span class="lineno">  863</span>&#160;        <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;R = PI * Y\n&quot;</span>);</div><div class="line"><a name="l00864"></a><span class="lineno">  864</span>&#160;        <a class="code" href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a>(MatR);</div><div class="line"><a name="l00865"></a><span class="lineno">  865</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatR);</div><div class="line"><a name="l00866"></a><span class="lineno">  866</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatY);</div><div class="line"><a name="l00867"></a><span class="lineno">  867</span>&#160;</div><div class="line"><a name="l00868"></a><span class="lineno">  868</span>&#160;    <a class="code" href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a>(MatPI);</div><div class="line"><a name="l00869"></a><span class="lineno">  869</span>&#160;</div><div class="line"><a name="l00870"></a><span class="lineno">  870</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;==========================================\n&quot;</span>);</div><div class="line"><a name="l00871"></a><span class="lineno">  871</span>&#160;    <a class="code" href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a>(<span class="stringliteral">&quot;\n&quot;</span>);</div><div class="line"><a name="l00872"></a><span class="lineno">  872</span>&#160;    </div><div class="line"><a name="l00873"></a><span class="lineno">  873</span>&#160;}</div><div class="line"><a name="l00874"></a><span class="lineno">  874</span>&#160;<span class="preprocessor">#endif</span></div><div class="line"><a name="l00875"></a><span class="lineno">  875</span>&#160;</div><div class="line"><a name="l00876"></a><span class="lineno">  876</span>&#160;        </div><div class="ttc" id="struct__mat_html_a00dcd82a8de11b7f16f7edfde55bcfae"><div class="ttname"><a href="struct__mat.html#a00dcd82a8de11b7f16f7edfde55bcfae">_mat::data</a></div><div class="ttdeci">float ** data</div><div class="ttdef"><b>Definition:</b> <a href="matrix_8h_source.html#l00028">matrix.h:28</a></div></div>
<div class="ttc" id="matrix_8c_html_a533fea51f46e772b14ec519a9f36aef9"><div class="ttname"><a href="matrix_8c.html#a533fea51f46e772b14ec519a9f36aef9">TestSquare</a></div><div class="ttdeci">MEMSPACE int TestSquare(mat_t MatA)</div><div class="ttdoc">Credits: https://www.cs.rochester.edu/~brown/Crypto/assts/projects/adj.html. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00037">matrix.c:37</a></div></div>
<div class="ttc" id="user__config_8h_html"><div class="ttname"><a href="user__config_8h.html">user_config.h</a></div><div class="ttdoc">Master include file for project Includes all project includes and defines here. </div></div>
<div class="ttc" id="matrix_8c_html_ac950e582063e7d093f0384c5a35b6024"><div class="ttname"><a href="matrix_8c.html#ac950e582063e7d093f0384c5a35b6024">MatPrint</a></div><div class="ttdeci">MEMSPACE void MatPrint(mat_t matrix)</div><div class="ttdoc">Print a matrix. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00187">matrix.c:187</a></div></div>
<div class="ttc" id="matrix_8c_html_a69e8069902ef085b6c19b391f3379492"><div class="ttname"><a href="matrix_8c.html#a69e8069902ef085b6c19b391f3379492">Transpose</a></div><div class="ttdeci">MEMSPACE mat_t Transpose(mat_t MatA)</div><div class="ttdoc">Transpose matrix. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00263">matrix.c:263</a></div></div>
<div class="ttc" id="posix_8c_html_a3759827e157badd49d076bd157f508d9"><div class="ttname"><a href="posix_8c.html#a3759827e157badd49d076bd157f508d9">fgets</a></div><div class="ttdeci">MEMSPACE char * fgets(char *str, int size, FILE *stream)</div><div class="ttdoc">get a string from stdin See fdevopen() sets stream-&gt;put get for TTY devices </div><div class="ttdef"><b>Definition:</b> <a href="posix_8c_source.html#l00420">posix.c:420</a></div></div>
<div class="ttc" id="posix_8c_html_a8e661c338f41695d1a1e70aed6255e2d"><div class="ttname"><a href="posix_8c.html#a8e661c338f41695d1a1e70aed6255e2d">fopen</a></div><div class="ttdeci">MEMSPACE FILE * fopen(const char *path, const char *mode)</div><div class="ttdoc">POSIX Open a file with path name and ascii file mode string. </div><div class="ttdef"><b>Definition:</b> <a href="posix_8c_source.html#l00782">posix.c:782</a></div></div>
<div class="ttc" id="struct____file_html"><div class="ttname"><a href="struct____file.html">__file</a></div><div class="ttdoc">FILE type structure. </div><div class="ttdef"><b>Definition:</b> <a href="posix_8h_source.html#l00156">posix.h:156</a></div></div>
<div class="ttc" id="posix_8c_html_a91ade11061b9b43b1edd37ff32f76591"><div class="ttname"><a href="posix_8c.html#a91ade11061b9b43b1edd37ff32f76591">fprintf</a></div><div class="ttdeci">MEMSPACE int fprintf(FILE *fp, const char *format,...)</div><div class="ttdoc">fprintf function Example user defined printf function using fputc for I/O This method allows I/O to d...</div><div class="ttdef"><b>Definition:</b> <a href="posix_8c_source.html#l02484">posix.c:2484</a></div></div>
<div class="ttc" id="matrix_8c_html_aa96a1963cc354fe2a055eae3c846227c"><div class="ttname"><a href="matrix_8c.html#aa96a1963cc354fe2a055eae3c846227c">Cofactor</a></div><div class="ttdeci">MEMSPACE float Cofactor(mat_t MatA, int row, int col)</div><div class="ttdoc">Cofactor is determinate of minor submatrix * (-1)exp(row+col) Minor submatrix has one less row and co...</div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00310">matrix.c:310</a></div></div>
<div class="ttc" id="struct__mat_html_a5ee73c0c8484d47a000464681b298762"><div class="ttname"><a href="struct__mat.html#a5ee73c0c8484d47a000464681b298762">_mat::cols</a></div><div class="ttdeci">int cols</div><div class="ttdef"><b>Definition:</b> <a href="matrix_8h_source.html#l00029">matrix.h:29</a></div></div>
<div class="ttc" id="matrix_8c_html_a5595f5b7a290aaeaf2daf98858bbdac2"><div class="ttname"><a href="matrix_8c.html#a5595f5b7a290aaeaf2daf98858bbdac2">MatAlloc</a></div><div class="ttdeci">MEMSPACE mat_t MatAlloc(int rows, int cols)</div><div class="ttdoc">Allocate a matrix. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00048">matrix.c:48</a></div></div>
<div class="ttc" id="struct__mat_html"><div class="ttname"><a href="struct__mat.html">_mat</a></div><div class="ttdef"><b>Definition:</b> <a href="matrix_8h_source.html#l00027">matrix.h:27</a></div></div>
<div class="ttc" id="posix__tests_8c_html_a8d4059ff64356316a5f13d16cdd90fb5"><div class="ttname"><a href="posix__tests_8c.html#a8d4059ff64356316a5f13d16cdd90fb5">sum</a></div><div class="ttdeci">MEMSPACE uint16_t sum(char *name)</div><div class="ttdoc">sum of a file with 16bit hex and integer results </div><div class="ttdef"><b>Definition:</b> <a href="posix__tests_8c_source.html#l00626">posix_tests.c:626</a></div></div>
<div class="ttc" id="matrix_8c_html_a37d07d9a07bb5ed06e22ac723e7cd269"><div class="ttname"><a href="matrix_8c.html#a37d07d9a07bb5ed06e22ac723e7cd269">Minor</a></div><div class="ttdeci">MEMSPACE float Minor(mat_t MatA, int row, int col)</div><div class="ttdoc">Compute determinate of the minor submatrix Minor submatrix has one less row and column as a result...</div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00291">matrix.c:291</a></div></div>
<div class="ttc" id="cpu_8h_html_a070d2ce7b6bb7e5c05602aa8c308d0c4"><div class="ttname"><a href="cpu_8h.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a></div><div class="ttdeci">#define NULL</div><div class="ttdef"><b>Definition:</b> <a href="cpu_8h_source.html#l00055">cpu.h:55</a></div></div>
<div class="ttc" id="mathio_8h_html_a581d4eb5e2c88dd6a011ed595bf413f8"><div class="ttname"><a href="mathio_8h.html#a581d4eb5e2c88dd6a011ed595bf413f8">strtod</a></div><div class="ttdeci">MEMSPACE double strtod(const char *nptr, char **endptr)</div></div>
<div class="ttc" id="matrix_8c_html_a5d91cec0176890e753207fa1b32ef505"><div class="ttname"><a href="matrix_8c.html#a5d91cec0176890e753207fa1b32ef505">DeleteRowCol</a></div><div class="ttdeci">MEMSPACE mat_t DeleteRowCol(mat_t MatA, int row, int col)</div><div class="ttdoc">Create smaller matrix by deleatting specified row and colume Used by Minor and Cofactor. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00212">matrix.c:212</a></div></div>
<div class="ttc" id="struct__mat_html_ab54203ad7b60fc23832cb3b2a863857f"><div class="ttname"><a href="struct__mat.html#ab54203ad7b60fc23832cb3b2a863857f">_mat::size</a></div><div class="ttdeci">int size</div><div class="ttdef"><b>Definition:</b> <a href="matrix_8h_source.html#l00031">matrix.h:31</a></div></div>
<div class="ttc" id="send_8c_html_a0ddf1224851353fc92bfbff6f499fa97"><div class="ttname"><a href="send_8c.html#a0ddf1224851353fc92bfbff6f499fa97">main</a></div><div class="ttdeci">int main(int argc, char *argv[])</div><div class="ttdef"><b>Definition:</b> <a href="send_8c_source.html#l00148">send.c:148</a></div></div>
<div class="ttc" id="matrix_8h_html"><div class="ttname"><a href="matrix_8h.html">matrix.h</a></div><div class="ttdoc">matrix functions </div></div>
<div class="ttc" id="posix_8c_html_ad6fd240fec1d65213f34b6e6465a8033"><div class="ttname"><a href="posix_8c.html#ad6fd240fec1d65213f34b6e6465a8033">fclose</a></div><div class="ttdeci">MEMSPACE int fclose(FILE *stream)</div><div class="ttdoc">POSIX close a file stream. </div><div class="ttdef"><b>Definition:</b> <a href="posix_8c_source.html#l01239">posix.c:1239</a></div></div>
<div class="ttc" id="mathio_8h_html_a79c7a2e931845b0fb6b2fa6d63939de4"><div class="ttname"><a href="mathio_8h.html#a79c7a2e931845b0fb6b2fa6d63939de4">sscanf</a></div><div class="ttdeci">int sscanf(const char *strp, const char *fmt,...)</div></div>
<div class="ttc" id="struct__mat_html_a5e6bcb8b0c0239ca9b782c48b0b3c98a"><div class="ttname"><a href="struct__mat.html#a5e6bcb8b0c0239ca9b782c48b0b3c98a">_mat::rows</a></div><div class="ttdeci">int rows</div><div class="ttdef"><b>Definition:</b> <a href="matrix_8h_source.html#l00030">matrix.h:30</a></div></div>
<div class="ttc" id="matrix_8c_html_ad75902878173dfc33c227a75862c9c10"><div class="ttname"><a href="matrix_8c.html#ad75902878173dfc33c227a75862c9c10">MatRead</a></div><div class="ttdeci">MEMSPACE mat_t MatRead(char *name)</div><div class="ttdoc">Read a matrix. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00527">matrix.c:527</a></div></div>
<div class="ttc" id="matrix_8c_html_a5140bc12eedbf802992531ca0ef3f0a8"><div class="ttname"><a href="matrix_8c.html#a5140bc12eedbf802992531ca0ef3f0a8">Adjugate</a></div><div class="ttdeci">MEMSPACE mat_t Adjugate(mat_t MatA)</div><div class="ttdoc">Adjugate is transpose of cofactor matrix of A. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00325">matrix.c:325</a></div></div>
<div class="ttc" id="cpu_8h_html_ad0fe97585b8891f5e4f2b9a6426330a4"><div class="ttname"><a href="cpu_8h.html#ad0fe97585b8891f5e4f2b9a6426330a4">MEMSPACE</a></div><div class="ttdeci">#define MEMSPACE</div><div class="ttdef"><b>Definition:</b> <a href="cpu_8h_source.html#l00025">cpu.h:25</a></div></div>
<div class="ttc" id="matrix_8c_html_ad8c8055df2f89f410d49002690ede4cf"><div class="ttname"><a href="matrix_8c.html#ad8c8055df2f89f410d49002690ede4cf">MatLoad</a></div><div class="ttdeci">MEMSPACE mat_t MatLoad(void *V, int rows, int cols)</div><div class="ttdoc">Load a matrix. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00152">matrix.c:152</a></div></div>
<div class="ttc" id="matrix_8c_html_a2b9e8a544e7c2b04934737a30a19c6f6"><div class="ttname"><a href="matrix_8c.html#a2b9e8a544e7c2b04934737a30a19c6f6">MatFree</a></div><div class="ttdeci">MEMSPACE void MatFree(mat_t matF)</div><div class="ttdoc">Free a matrix. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00116">matrix.c:116</a></div></div>
<div class="ttc" id="mathio_8h_html_ad6078f8da2d30ecaef99e0c2d250c0c8"><div class="ttname"><a href="mathio_8h.html#ad6078f8da2d30ecaef99e0c2d250c0c8">printf</a></div><div class="ttdeci">MEMSPACE int printf(const char *format,...)</div></div>
<div class="ttc" id="matrix_8c_html_a5539a20ee0f152e7f1e38d36b3dfda20"><div class="ttname"><a href="matrix_8c.html#a5539a20ee0f152e7f1e38d36b3dfda20">MatMul</a></div><div class="ttdeci">MEMSPACE mat_t MatMul(mat_t MatA, mat_t MatB)</div><div class="ttdoc">Multiply two matrix. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00490">matrix.c:490</a></div></div>
<div class="ttc" id="matrix_8c_html_a6b1e8be5bc0c3a79a81e4254bbd8e6a5"><div class="ttname"><a href="matrix_8c.html#a6b1e8be5bc0c3a79a81e4254bbd8e6a5">MatWrite</a></div><div class="ttdeci">MEMSPACE int MatWrite(char *name, mat_t MatW)</div><div class="ttdoc">Write a matrix. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00605">matrix.c:605</a></div></div>
<div class="ttc" id="matrix_8c_html_ad554fcd60a6674448de06fbfc40d41d0"><div class="ttname"><a href="matrix_8c.html#ad554fcd60a6674448de06fbfc40d41d0">MatLoadSQ</a></div><div class="ttdeci">MEMSPACE mat_t MatLoadSQ(void *V, int size)</div><div class="ttdoc">Load a square matrix. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00176">matrix.c:176</a></div></div>
<div class="ttc" id="system_8c_html_a61f06ee340417c629633142e0a5db288"><div class="ttname"><a href="system_8c.html#a61f06ee340417c629633142e0a5db288">safefree</a></div><div class="ttdeci">MEMSPACE void safefree(void *p)</div><div class="ttdoc">Safe free - Only free a pointer if it is in malloc memory range. We want to try to catch frees of sta...</div><div class="ttdef"><b>Definition:</b> <a href="system_8c_source.html#l00165">system.c:165</a></div></div>
<div class="ttc" id="matrix_8c_html_af4eb7f5eff3cb27e283a27c7fbb53d6a"><div class="ttname"><a href="matrix_8c.html#af4eb7f5eff3cb27e283a27c7fbb53d6a">Determinant</a></div><div class="ttdeci">MEMSPACE float Determinant(mat_t MatA)</div><div class="ttdoc">Determinant by recursion using Cofactors. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00350">matrix.c:350</a></div></div>
<div class="ttc" id="matrix_8c_html_ae601ec2eed7dd95254dffd0e6ac03d23"><div class="ttname"><a href="matrix_8c.html#ae601ec2eed7dd95254dffd0e6ac03d23">MatAllocSQ</a></div><div class="ttdeci">MEMSPACE mat_t MatAllocSQ(int size)</div><div class="ttdoc">Allocate a matrix. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00105">matrix.c:105</a></div></div>
<div class="ttc" id="matrix_8c_html_a7d4a273868c8ba43d51338aee9310b00"><div class="ttname"><a href="matrix_8c.html#a7d4a273868c8ba43d51338aee9310b00">Invert</a></div><div class="ttdeci">MEMSPACE mat_t Invert(mat_t MatA)</div><div class="ttdoc">Calculate Matrix Inverse. </div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00399">matrix.c:399</a></div></div>
<div class="ttc" id="system_8c_html_a65ca18fba3d6cdb9ce8ca8040a96e0c5"><div class="ttname"><a href="system_8c.html#a65ca18fba3d6cdb9ce8ca8040a96e0c5">safecalloc</a></div><div class="ttdeci">MEMSPACE void * safecalloc(size_t nmemb, size_t size)</div><div class="ttdoc">Safe Calloc - Display Error message if Calloc fails. </div><div class="ttdef"><b>Definition:</b> <a href="system_8c_source.html#l00128">system.c:128</a></div></div>
<div class="ttc" id="matrix_8c_html_a2217661f847795248eb975a64539488e"><div class="ttname"><a href="matrix_8c.html#a2217661f847795248eb975a64539488e">PseudoInvert</a></div><div class="ttdeci">MEMSPACE mat_t PseudoInvert(mat_t MatA)</div><div class="ttdoc">Calculate Pseudo Matrix Inverse Used for least square fitting of non square matrix with excess soluti...</div><div class="ttdef"><b>Definition:</b> <a href="matrix_8c_source.html#l00456">matrix.c:456</a></div></div>
</div><!-- fragment --></div><!-- contents -->
<!-- start footer part -->
<hr class="footer"/><address class="footer"><small>
Generated on Wed Jan 31 2018 21:22:16 for ESP8266 ILI9341 display support code with printf sources, wire-frame viewer and custom fonts by &#160;<a href="http://www.doxygen.org/index.html">
<img class="footer" src="doxygen.png" alt="doxygen"/>
</a> 1.8.11
</small></address>
</body>
</html>
